home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 January / PCO0197.ISO / filesbbs / os2 / inadv095.arj / UNINST.CMD < prev   
Encoding:
Text File  |  1996-09-08  |  772 b   |  33 lines
  1. /*
  2.  
  3.   REXX Script to uninstall Internet Adventurer - and remove the settings
  4.   from OS2.INI
  5.  
  6. */
  7.  
  8. if RxFuncQuery('SysLoadFuncs') then do
  9.    call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  10.    call SysLoadFuncs
  11. end
  12.  
  13.  
  14. say "Are you sure you want to delete Internet Adventurer ?"
  15. say "This will delete settings from OS2.INI, and delete the folder"
  16. say "*** Deleting the settings, also deletes any registration info !! ***"
  17. say "Answer Yes or No"
  18.  
  19. parse upper pull answer .
  20.  
  21. if left(answer, 1) \= 'Y' then do
  22.    say "Uninstall aborted"
  23.    exit
  24. end
  25.  
  26. say "Deleting Folder"
  27. call SysDestroyObject "<INETADVFOLDER>"
  28.  
  29. say "Deleting Internet Adventurer settings from OS2.INI"
  30. call SysIni 'USER', "Internet Adventurer"
  31.  
  32. say 'Deleting completed'
  33.