home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / prgramer / cenvi / diskfree.cmd < prev    next >
Encoding:
Text File  |  1994-03-08  |  897 b   |  24 lines
  1. @echo OFF
  2. REM ************************************************************************
  3. REM *** DiskFree.cmd - Display how much disk space is available on a     ***
  4. REM *** ver.1          drive, and set the DISK_FREE environment variable ***
  5. REM ***                to that amount                                    ***
  6. REM ************************************************************************
  7.  
  8. if "%1" == "" GOTO SHOW_HOW
  9. if not "%2"=="" GOTO SHOW_HOW
  10. dir %1:\ | find "bytes free" | CEnvi DISK_FREE = atol(gets()) / 1024; ESet("TempSet.cmd")
  11. call TempSet.cmd
  12. del TempSet.cmd
  13. ECHO DRIVE %1 HAS %DISK_FREE% K-BYTES FREE
  14. GOTO FINI
  15.  
  16. :SHOW_HOW
  17. ECHO DiskFree.cmd - Show how much disk space is available on a drive, in kilobytes,
  18. ECHO                and set DISK_FREE environment variable to that size
  19. ECHO USAGE: DiskFree DriveLetter
  20. ECHO Example: DiskFree C
  21. GOTO FINI
  22.  
  23. :FINI
  24.