home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / 6 / 6pakbats.zip / PCBSK.BAT < prev    next >
DOS Batch File  |  1993-02-28  |  876b  |  37 lines
  1. @echo off
  2. if exist pcberr.fil del pcberr.fil
  3. if exist pcbdsz.log del pcbdsz.log
  4. if exist sort.txt del sort.txt
  5. GOTO SINGLE
  6.  
  7.  
  8. :SINGLE
  9. COPY %3 E:\TEMP%NODE%
  10. GOTO LOGOS
  11.  
  12. :LOGOS
  13. FOR %%G IN (E:\TEMP%NODE%\*.GIF) DO CPASTE C:\PCB\COMMENT.EXT %%G
  14. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO PKZIP -a %%Z C:\PCB\BBSAD.TXT
  15. FOR %%A IN (E:\TEMP%NODE%\*.ARJ) DO ARJ a -we:\temp -jh2048 %%A C:\PCB\BBSAD.TXT
  16. FOR %%L IN (E:\TEMP%NODE%\*.LZH) DO LHA a %%L C:\PCB\BBSAD.TXT
  17. FOR %%S IN (E:\TEMP%NODE%\*.ZIP) DO STRIPZIP %%S
  18. FOR %%Z IN (E:\TEMP%NODE%\*.ZIP) DO ZIPLOGO %%Z
  19. GOTO SEND
  20.  
  21. :SEND
  22. for %%f in (E:\temp%NODE%\*.*) do dsz sx -k %%f
  23. if errorlevel == 1 goto ABORTED
  24. goto CLEANUP
  25.  
  26. :ABORTED
  27. copy pcberr.old pcberr.fil
  28. GOTO CLEANUP
  29.  
  30. :CLEANUP
  31. if exist pcbdsz.lst del pcbdsz.lst
  32. if exist sort.txt del sort.txt
  33. For %%D In (E:\Temp%NODE%\*.*) DO Del %%D
  34. goto end
  35.  
  36. :end
  37.