home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / uptime11.zip / reg.cmd < prev    next >
OS/2 REXX Batch file  |  1999-05-01  |  518b  |  34 lines
  1. /*
  2.  * File: reg.cmd
  3.  *
  4.  * Register the 'uptime' class for WPS objects
  5.  *
  6.  * Bob Eager   April 1999
  7.  *
  8.  */
  9.  
  10. /* Load REXX system utility functions */
  11.  
  12. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  13. call SysLoadFuncs
  14.  
  15. /* Register the class */
  16.  
  17. res = SysRegisterObjectClass('uptime', 'F:\OTHERDLL\UPTIME.DLL')
  18.  
  19. /* Check result and display status message */
  20.  
  21. if res = 1 then do
  22.    say "Registered OK"
  23. end
  24. else do
  25.    say "Not registered"
  26. end
  27.  
  28. /*
  29.  * End of file: reg.cmd
  30.  *
  31.  */
  32.  
  33.  
  34.