home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / tool / disktool / spaced / readme.txt next >
Text File  |  1994-10-02  |  852b  |  41 lines
  1. SPACE.DLL
  2.  
  3.   This .DLL contains two functions that returns total space on a disk
  4.   and free space on disk.
  5.  
  6.   The declaration syntax is:
  7.  
  8.   Declare Function FreeSpaceOnDisk LIB "SPACE.DLL" (ByVal Drive as long) as long
  9.   Declare Function TotalSpaceOnDisk LIB "SPACE.DLL" (ByVal Drive as long) as long
  10.  
  11.   The drive paramater:
  12.  
  13.   0 = default drive
  14.   1 = A:
  15.   2 = B:
  16.   3 = C:
  17.   etc....
  18.   
  19.   If the returnvalue is -1 then there is either no disk in the drive or the
  20.   drive is invalid.
  21.  
  22.   Visual basic example:
  23.  
  24.   Form_Load()
  25.  
  26.     Dim Free, Total as long
  27.  
  28.     Free = FreeSpaceOnDisk(0)
  29.     Total = TotalSpaceOnDisk(0)
  30.  
  31.     If free = -1 then
  32.       Print("Disk not inserted in drive or drive failure!")
  33.     Else If
  34.       Print("Total Disk Space Is:",Total)
  35.       Print("Free Disk Space:",Free)
  36.     End If
  37.   
  38.   End
  39.  
  40.   
  41.