home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 9 Archive / 09-Archive.zip / zipshell.zip / pack_zip.cmd < prev    next >
OS/2 REXX Batch file  |  1998-08-24  |  285b  |  14 lines
  1. ..\sendmsg Pack WM_CLOSE
  2. zip -r -m ..\Pack_ *
  3. cd ..
  4. del %1\OldPk*.zip
  5. ren %1\Pack*.zip OldPk*.zip
  6. zipsplit -n 1456000 Pack_ -b %1
  7. if not errorlevel 1 goto OK
  8. copy Pack_.zip %1\PkTooBig.zip
  9. :OK
  10. del Pack_.zip
  11. if exist %1\pack_2.zip goto END
  12. ren %1\pack_1.zip Pack.zip
  13. :END
  14.