home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / ncr1117.zip / IBMNC001.CMD next >
OS/2 REXX Batch file  |  1995-09-11  |  1KB  |  21 lines
  1. /*                  NETCOMBER IBMNC001.CMD                     */
  2. /*    (C) COPYRIGHT IBM CORP. 1995.  ALL RIGHTS RESERVED.      */
  3. /*           LICENSED MATERIALS - PROPERTY OF IBM              */
  4. /*                                                             */
  5. /* IBMNC001.CMD is called by the Software Installer during the */
  6. /* installation of Netcomber.  IBMNC001 verifies that the      */
  7. /* Internet Access Kit is installed on the user's machine by   */
  8. /* looking for SET ETC in the user's CONFIG.SYS.               */
  9. parse arg boot_drive
  10. fid=strip(boot_drive)||'config.sys'
  11. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  12. call SysLoadFuncs
  13. do while lines(fid)\=0
  14.    parse value linein(fid) with set attr '=' .
  15.    if set='SET' & attr = 'ETC' then exit 0
  16. end /* do */
  17. resp=RxMessageBox('You also need to install the IBM Internet Connection. After exiting',
  18.                   'Netcomber installation, change the current directory of your CD-ROM drive',
  19.                   'to \INTERNET, then enter INSTALL.','Warning','OK','WARNING')
  20. exit 0
  21.