home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / igate110.zip / DESKTOP.CMD next >
OS/2 REXX Batch file  |  1997-05-06  |  1KB  |  41 lines
  1. /* Begin Desktop.CMD for Internet Gate */
  2. '@Echo off'
  3.  
  4. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  5. call SysLoadFuncs
  6.  
  7. curdir = directory()
  8.  
  9. say "Creating Internet Gate folder..."
  10.  
  11. /* first, create IGATE folder */
  12.  
  13. title = "Internet Gate"
  14. classname = 'WPFolder'
  15. location = '<WP_DESKTOP>'
  16. setup = 'OBJECTID=<IGATE_Folder>;OPEN=DEFAULT'
  17. result=SysCreateObject(classname,title,location,setup,f)
  18.  
  19. say "Creating objects in Internet Gate folder..."
  20.  
  21. /* now, create program objects in IGATE folder */
  22.  
  23. title = "Internet Gate 1.10"
  24. classname = 'WPProgram'
  25. location = '<IGATE_Folder>'
  26. setup = 'EXENAME='curdir'\IGATE.EXE;STARTUPDIR='curdir
  27. call SysCreateObject classname,title,location,setup,u
  28.  
  29. title = "Online Documentation"
  30. classname = 'WPProgram'
  31. location = '<IGATE_Folder>'
  32. setup = 'EXENAME=VIEW.EXE;STARTUPDIR='curdir';PARAMETERS=igate'
  33. call SysCreateObject classname,title,location,setup,u
  34.  
  35. title = "Purchase"
  36. classname = 'WPProgram'
  37. location = '<IGATE_Folder>'
  38. setup = 'EXENAME='curdir'\PURCHASE.EXE;STARTUPDIR='curdir
  39. call SysCreateObject classname,title,location,setup,u
  40.  
  41.