home *** CD-ROM | disk | FTP | other *** search
/ RBBS in a Box Volume 1 #2 / RBBS_vol1_no2.iso / 014r / rearc.zip / SUB.BAT < prev   
DOS Batch File  |  1987-03-02  |  297b  |  16 lines
  1. ECHO OFF
  2. PKXARC %1 %2
  3. IF ERRORLEVEL 1 GOTO XFAIL
  4. PKARC /OT A %2\TEMP.ARC %2\*.*
  5. IF ERRORLEVEL 1 GOTO AFAIL
  6. COPY %2\TEMP.ARC %1
  7. GOTO END
  8. :XFAIL
  9. ECHO %1 Failed to extract >>%3ERROR.LOG
  10. GOTO END
  11. :AFAIL
  12. ECHO %1 Failed to archive >>%3ERROR.LOG
  13. :END
  14. FOR %%A IN (%2\*.* ) DO DEL %%A
  15. EXIT
  16.