home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 March / PCO3_97.ISO / filesbbs / os2 / zipshell.arj / DEINSTAL.CMD < prev    next >
Encoding:
Text File  |  1996-12-09  |  636 b   |  26 lines
  1. /*  rexx-program
  2.     Author: Martin Vieregg, Germany, March 1995    */
  3.  
  4. Call RxFuncAdd 'SysLoadFuncs','RexxUtil','SysLoadFuncs'
  5. Call SysLoadFuncs
  6.  
  7. say "Beginning deleting folders and program objects..."
  8.  
  9. Call Destroy "<MVdir_arj>"
  10. Call Destroy "<MVdir_zip>"
  11. Call Destroy "<MVunpack_arj>"
  12. Call Destroy "<MVunpack_zip>"
  13. Call Destroy "<MVempty>"
  14.  
  15. Call Destroy "<MVpack_zip>"
  16. Call Destroy "<MVPackProgs>"
  17. Call Destroy "<MVPackFolder>"
  18.  
  19. say "Successful destroying of folders and program objects."
  20.  
  21. exit
  22.  
  23. Destroy:
  24. if SysDestroyObject(ARG(1)) then say "deleting "ARG(1)" OK"
  25. else say "deleting "ARG(1)" failed"
  26. return