home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / ilink1_2.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1997-05-26  |  1KB  |  33 lines
  1. /* REXX installation script for iLink/2 */
  2.  
  3. call RxFuncAdd 'SysCls', 'RexxUtil', 'SysCls'
  4. call RxFuncAdd 'SysCreateObject', 'RexxUtil', 'SysCreateObject'
  5.  
  6. currentDirectory = directory()
  7. programName = "\ILINK2.EXE"
  8. programPath = insert( currentDirectory, programName )
  9. executable = insert( "EXENAME=", programPath )
  10.  
  11. SysCreateObject("WPProgram","iLink/2","<WP_DESKTOP>",,
  12.                 executable, "REPLACE" )
  13.  
  14. call SysCls
  15.  
  16. say ""
  17. say ""
  18. say "----------------------------------------------------------------"
  19. say " iLink/2 - Drop-In replacement for IBM's 'Dial Other Provider'. "
  20. say " BMT Micro, Inc. (C) 1997 - All Rights Reserved                 "
  21. say "----------------------------------------------------------------"
  22. say ""
  23. say " iLink/2 object successfully created on desktop..."
  24. say ""
  25. say " Start iLink/2 by double-clicking on the program object.        "
  26. say ""
  27. say "*****************************************************************"
  28. say "* This program is  distributed as shareware. You must register  *"
  29. say "* this  product if you  continue  to  use it.   Please  see the *"
  30. say "* documentation for the complete details.                       *"
  31. say "*****************************************************************"
  32. say ""
  33.