home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / dst.zip / DSTADD.CMD < prev    next >
OS/2 REXX Batch file  |  1996-10-02  |  845b  |  22 lines
  1. /*    Add Day Light Savings Icon to Startup Folder */
  2. /*    GW Barrowcliff              */
  3. /*    Version 1.0    10/2/96                              */
  4.  
  5. Version='Add Day Light Savings Icon to Startup Folder Version 1.0 10/2/96 GWB'
  6. say Version
  7. call RxFuncAdd 'SysLoadFuncs' , 'RexxUtil',  'SysLoadFuncs'
  8. call SysLoadFuncs
  9. title='Day Light^Savings Time'
  10. location='<WP_START>'
  11. objectid='<DayLight_Savings_Time>'
  12. result=SysDestroyObject(objectid)                           /* Get rid of the old one */
  13. Classname='WPProgram'
  14.    setup= 'OBJECTID='||objectid,
  15.           ';EXENAME=C:\misc\DST.CMD',
  16.           ';MINIMIZED=YES',
  17.           ';PROGTYPE=WINDOWABLEVIO',
  18.           ';ICONFILE=C:\MISC\DST.ICO;'
  19. result=SysCreateObject(classname,title,location,setup,'R')  /* 'F'ail, 'R'eplace, 'U'pdate, 'D'elete  */
  20. if result<>1  then Say "Icon not Created"
  21.  
  22.