home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / we025.zip / REMOVE.CMD < prev    next >
OS/2 REXX Batch file  |  1997-03-29  |  2KB  |  49 lines
  1. /************************************************************************/
  2. /*                                                                      */
  3. /* Program name:   REMOVE.CMD  -- Removes WPS Helper Class              */
  4. /* Title:          WarpEnhancer                                         */
  5. /*                 PM Utility to give some missing                      */
  6. /*                 features to OS/2 users                               */
  7. /*                                                                      */
  8. /* Version:        pre-Release 0.17                                     */
  9. /*                 Created:       23.03.97                              */
  10. /*                 Last Modified: 23.03.97                              */
  11. /*                                                                      */
  12. /* Author:         Achim Hasenmueller                                   */
  13. /*                                                                      */
  14. /* Copyright 1996,97 by InnoTek Systemberatung. All rights reserved     */
  15. /*                                                                      */
  16. /************************************************************************/
  17.  
  18. /* load rexxutil library function                                       */
  19. Call RxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs'
  20.  
  21. Call SysLoadFuncs
  22.  
  23. SAY "************************************************"
  24. SAY "*  REMOVING WPS HELPER CLASS OF WARP ENHANCER  *"
  25. SAY "************************************************"
  26. SAY
  27.  
  28. if SysDestroyObject("<WE_WPSHELPER>") = 1 then
  29.   SAY "WPS Helper Object was deleted"
  30. else SAY "WPS Helper Object could not be deleted"
  31.  
  32. call SysDeregisterObjectClass "WEWPS"
  33.  
  34. SAY
  35.  
  36. /* query OS/2 boot drive from environment variable                      */
  37. BootDrive = SUBSTR(VALUE('SYSTEM_INI',,'OS2ENVIRONMENT'), 1, 2)
  38.  
  39. WEWPSFile = BootDrive'\OS2\DLL\WEWPS.DLL'
  40.  
  41. if SysFileDelete(WEWPSFile) = 0 then
  42.   SAY "WPS Helper Class File was deleted"
  43. else SAY "Error deleting WPS Helper Class File"
  44.  
  45. exit
  46.  
  47.  
  48.  
  49.