home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / prjbld.zip / uninstal.cmd < prev    next >
OS/2 REXX Batch file  |  1998-12-28  |  2KB  |  57 lines
  1. /*
  2.  
  3.   REXX Script to uninstall PrjBld and remove all desktop folders
  4.   - leaves the INI file intact.  Erases most EXE and support files.
  5.  
  6.   This file should be located in the same directory as the PRJBLD.EXE 
  7.   and support files.
  8. */
  9.  
  10.     if RxFuncQuery('SysLoadFuncs') then do
  11.         call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  12.         call SysLoadFuncs
  13.     end
  14.  
  15.     do forever
  16.         CALL SysCls
  17.         say "You are about to delete all the PrjBld program folders from your desktop."
  18.         say
  19.         say "This will not affect any project folders created with PrjBld."
  20.         say 
  21.         say "Your PRJBLD.INI file will be left in your installation directory so that"
  22.         say "PrjBld can be easily reinstalled later.  Remove PRJBLD.INI manually if"
  23.         say "you don't need it any more."
  24.         say
  25.         call SysSleep 2
  26.         say "Are you sure you want to uninstall PrjBld? [Y/N]"
  27.         CALL BEEP 2000,1
  28.         parse upper pull Char
  29.             if Char = "Y" then 
  30.              leave
  31.         if Char = "N" THEN
  32.              EXIT;
  33.     end
  34.  
  35.     say "Deleting folders"
  36.     call SysDestroyObject("<PRJBLDFOLDER>") 
  37.     say "Deleting files"
  38.     call SysFileDelete("FILE_ID.DIZ");
  39.     call SysFileDelete("IDK.ICO");
  40.     call SysFileDelete("IDKO.ICO");
  41.     call SysFileDelete("INSTALL.CMD");
  42.     call SysFileDelete("INSTALL.ICO");
  43.     call SysFileDelete("ORDER.FRM");
  44.     call SysFileDelete("PLASTER.BMP");
  45.     call SysFileDelete("PRJBLD.EXE");
  46.     call SysFileDelete("PRJBLD.HLP");
  47.     call SysFileDelete("PURCHASE.APP");
  48.     call SysFileDelete("PURCHASE.DOC");
  49.     call SysFileDelete("PURCHASE.EXE");
  50.     call SysFileDelete("README.TXT");
  51.     call SysFileDelete("REGISTER.FRM");
  52.     call SysFileDelete("REGISTER.TXT");
  53.     call SysFileDelete("UNINSTAL.ICO");
  54.  
  55.     say "UnInstallation completed - PrjBld"
  56. 
  57.