home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / BBSDOOR2.ARJ / UPCHK600.ZIP / ADVANCED.BAT next >
DOS Batch File  |  1995-01-01  |  2KB  |  73 lines
  1. @ECHO OFF
  2.  
  3. rem !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  4. rem !!  This is the advanced batch file that will include inserting       !!  
  5. rem !!  comments into any of the support archive types (if keep original  !!
  6. rem !!  name is turned on)                                                !!   
  7. rem !!                                                                    !!
  8. rem !!  UpUtils /R will return an errorlevel depending on archive type    !!
  9. rem !!   1=ARC  2=ARJ  3=LHA  4=LZH  5=PAK  6=ZIP  7=ZOO  8=SQZ  9=UC2    !! 
  10. rem !!  13=EXE 14=GIF 15=JPG 16=???                                       !!
  11. rem !!                                                                    !!
  12. rem !!  UpUtils /E will return the errorlevel specified                   !!
  13. rem !!                                                                    !!
  14. rem !!  Remember that you must pass this file two parameters, the first   !!
  15. rem !!  being the dropfile (ie DOOR.SYS) and the second being the archive !!
  16. rem !!                                                                    !!
  17. rem !!  Example for RA: *C /C C:\RA\UPCHECK\ADVANCED.BAT C:\RA\DOOR.SYS @ !!
  18. rem !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  19.  
  20. rem *** Change to the UpCheck directory
  21. CD \RA\DOORS\UPCHECK
  22.  
  23. rem *** Run UpCheck, passing drop file and archive file
  24. UPCHECK %1 %2
  25.  
  26. rem *** Was there an error?
  27. IF ERRORLEVEL 1 GOTO :FAIL
  28.  
  29. :PASS
  30. UPUTILS /REPORT %2
  31. IF ERRORLEVEL 8 GOTO :PASSSQZ
  32. IF ERRORLEVEL 2 GOTO :PASSARJ
  33. GOTO :PASSEND
  34.  
  35. :PASSSQZ
  36. SQZ c %2 C:\BBS\COMMENT.TXT
  37. GOTO :PASSEND
  38.  
  39. :PASSARJ
  40. ARJ c %2 -zC:\BBS\COMMENT.TXT      
  41. GOTO :PASSEND
  42.  
  43. :FAIL
  44. UPUTILS /REPORT %2
  45. IF ERRORLEVEL 8 GOTO :FAILSQZ
  46. IF ERRORLEVEL 6 GOTO :FAILZIP
  47. IF ERRORLEVEL 2 GOTO :FAILARJ
  48. GOTO :FAILEND
  49.  
  50. :FAILSQZ
  51. SQZ c %2 C:\BBS\COMMENT.TXT
  52. GOTO :FAILEND
  53.  
  54. :FAILZIP
  55. PKZIP %2 -z < C:\BBS\COMMENT.TXT
  56. GOTO :FAILEND
  57.  
  58. :FAILARJ
  59. ARJ c %2 -zC:\BBS\COMMENT.TXT
  60. GOTO :FAILEND
  61.  
  62. :FAILEND
  63. rem *** Return a Non-Zero to tell the BBS the file failed
  64. UPUTILS /ERRORLEVEL 1
  65. GOTO :END
  66.  
  67. :PASSEND
  68. rem *** Return a Zero to tell the BBS the file passed
  69. UPUTILS /ERRORLEVEL 0
  70. GOTO :END
  71.  
  72. :END
  73.