home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / WSTBSK.ZIP / INSTALL.CMD < prev    next >
OS/2 REXX Batch file  |  1992-06-02  |  887b  |  39 lines
  1. /*  */
  2. Call RxFuncadd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  3. Call SysLoadFuncs
  4.  
  5. '@echo off'
  6.  
  7. 'copy wastebsk.dll c:\os2\dll 1>nul: 2>nul:'
  8.  
  9. if rc then do
  10.    say 'Error DLL could not be updated please re-boot'
  11.    /* Remove bad entry */
  12.    RetCode = SysDeregisterObjectClass( "WPWasteBskt");
  13.    'pause'
  14.    exit(1)
  15.    end
  16.  
  17. RetCode = SysRegisterObjectClass( "WPWasteBskt", "wastebsk")
  18.  
  19. if RetCode then
  20.    say 'WPWasteBskt Class registered'
  21. else do
  22.    say 'Error WPWasteBskt Class failed to register'
  23.    /* Remove false entry */
  24.    RetCode = SysDeregisterObjectClass( "WPWasteBskt");
  25.    exit(1)
  26.    end
  27.  
  28.  
  29. RetCode = SysCreateObject( "WPWasteBskt", "Waste Basket", "<WP_DESKTOP>", "OBJECTID=<MyFolder>")
  30.  
  31. if RetCode then
  32.    say 'WPWasteBskt Object created'
  33. else do
  34.    say 'Error creating object'
  35.    exit(1)
  36.    end
  37.  
  38. say 'A Waste Basket has been created'
  39.