home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / blackb10.zip / DT.CMD < prev    next >
OS/2 REXX Batch file  |  1995-02-10  |  719b  |  24 lines
  1. /* BlackBoard/2 */
  2. /* Creates desktop objects for BlackBoard/2 */
  3.  
  4. Call RxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs';
  5. Call SysLoadFuncs;
  6.  
  7.  
  8.   dir = directory()
  9.   say 'Installation directory ? ('dir')'
  10.  pull dir1
  11.   if dir1 \= "" then
  12.     dir = dir1
  13.   say 'Os/2 Boot drive '
  14.   pull boot
  15.  
  16.  rc=SysCreateObject('WPFolder','BlackBoard/2','<WP_DESKTOP>', 'OBJECTID=<IDF_BLACKB>;');
  17.  
  18.  rc=SysCreateObject('WPProgram','BlackBoard/2','<IDF_BLACKB>', 'EXENAME='dir'\BLACKB.EXE');
  19.  
  20.  rc=SysCreateObject('WPProgram','KKHQuery/2','<IDF_BLACKB>', 'EXENAME='dir'\KKHQUERY.EXE');
  21.  
  22.  rc=SysCreateObject('WPProgram','Documentation','<IDF_BLACKB>', ';EXENAME='boot':\os2\VIEW.EXE;PARAMETERS='dir'\BLACKB.INF');
  23.  
  24.