home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / cenvi23.zip / DISKFREE.CMD < prev    next >
OS/2 REXX Batch file  |  1994-10-03  |  898b  |  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" | CEnvi2 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.