home *** CD-ROM | disk | FTP | other *** search
/ com!online 2001 December / COMCD1201.iso / tonline / software / data1.cab / Software / DATA / phb / scriptn.scp < prev    next >
Encoding:
Text File  |  2001-08-13  |  659 b   |  31 lines
  1. ; iPass Dial-Up Networking Script
  2. ;
  3. ; Copyright (C) 1997-2000 iPass Inc.
  4. ;
  5. ; Do not edit this script.  Connection to the
  6. ; remote access point requires this script.
  7. ;
  8. ; Future auto-updates of this script will not
  9. ; occur when editions are made to this script.
  10. ;
  11. proc main
  12.     integer count = 0
  13.     transmit "^M"
  14.     delay 1
  15.     while count < 5 do
  16.     transmit "^M"
  17.     waitfor "ogin:" until 2
  18.     if $SUCCESS then
  19.     goto DoLogin
  20.     endif
  21.     count = count + 1
  22.     endwhile
  23.     halt
  24. DoLogin:
  25.     delay 1
  26.     transmit $USERID, raw
  27.     transmit "^M"
  28.     waitfor "Password:"
  29.     transmit $PASSWORD + "^M"
  30.     waitfor "PPP"
  31. endproc