home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / wpsdscr.zip / uninst.cmd < prev    next >
OS/2 REXX Batch file  |  1995-07-29  |  458b  |  24 lines

  1. /* rexx */
  2.  
  3. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4. call SysLoadFuncs
  5.  
  6. cls.1="DSCRFileList"
  7. cls.2="DSCRDataFile"
  8. dll.1="dscrlst"
  9. dll.2="dscrdf"
  10.  
  11. 'repClass WPFolder DSCRFileList back'
  12. 'repClass WPDataFile DSCRDataFile back'
  13.  
  14. do i=1 to 2
  15.   rc=SysDeregisterObjectClass(cls.i) 
  16.   if rc=1 then
  17.          say 'Class 'cls.i' successfully deregistered'
  18.   else do
  19.     say 'Error deregistering class 'cls.i
  20.   end            
  21. end
  22.  
  23.  
  24.