How to Find the Hard Disk Drive Name Using FoxBASE+/Mac

This article was previously published under Q112480

Using the sample program below, you can programmatically determine the name of the current hard disk drive for functions such as SET DEFAULT TO in situations where you will not know this information ahead of time.

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this code "as is" without warranty of any kind, either expressed or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

   *Procedure to determine the hard drive name
   SET TALK OFF     && stop echo to screen
   PRIVATE x
   x=LEFT(SYS(1033,SYS(16)),AT(":",SYS(1033,SYS(16))))
   *Now set the default directory to the Data Folder inside
   *the FoxBase folder in the main folder
   x=x+"FoxBase:Data:"
   SET DEFAULT TO "&x"
   SET TALK ON