home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. CD ROM (Annual Premium Edition)
/
premium.zip
/
premium
/
IBMOS2_1
/
ENVLGO.ZIP
/
PUT_ICON.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1993-02-03
|
957b
|
33 lines
/* Set up an ENVELOGO for OS/2 icon */
call rxfuncadd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs'
call SysLoadFuncs
call SysCls
say ""
say ""
say ""
say ""
say ""
say "Please enter the full path name of the ENVELOGO directory,"
say "where the ENVELOGO.EXE will be found."
say ""
say "Example: C:\MYAPPS\ENVELOGO"
say ""
say "Do NOT include trailing \"
say ""
say "(Type carefully)"
say ""
pull DirName
MyLine1="EXENAME="DirName"\ENVELOGO.EXE;"
MyLine2="STARTUPDIR="DirName";"
MyLine3="OBJECTID=<ENVELOGO>;"
MyLine3="HELPLIBRARY="DirName"\ENVELOGO.HLP;HELPPANEL=10000;"
call SysCreateObject 'WPProgram',,
'ENVELOGO',,
'<WP_DESKTOP>',,
MyLine1||MyLine2||MyLine3||MyLine4,,
'REPLACE:'