home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 19
/
CD_ASCQ_19_010295.iso
/
vrac_os2
/
drpnzip.zip
/
INSTALL.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1994-11-06
|
488b
|
15 lines
/* Create Drop and Zip Object on Desktop */
Call RxFuncAdd "SysLoadFuncs","RexxUtil","SysLoadFuncs"
Call SysLoadFuncs
CurrentDir=Directory()
FileName=CurrentDir||"\dropnzip.exe"
ExeName="EXENAME="||FileName
Say ExeName
If SysCreateObject("WPProgram","Drop and Zip","<WP_DESKTOP>",ExeName) then do
Say "Desktop Drop and Zip Object was created."
rc=SysSetIcon(FileName,"DropnZip.ico")
End
Else
Say "Could not create Desktop Drop and Zip Object."
Exit