home *** CD-ROM | disk | FTP | other *** search
/ Windows Shareware GOLD / NuclearComputingVol3No1.cdr / apps / f1192 / mci.scr < prev    next >
Text File  |  1991-09-22  |  599b  |  25 lines
  1. MESSAGE "STANDBY FOR MCI MAIL" "MCIMail" 
  2. WHILE NOT CANCEL
  3.    SEND "ATDT 9,1800 333-1818^M"
  4.    WAITFOR "CONNECT"
  5.    IF WAITFOR
  6.       TRANSMIT "^M"
  7.       WAITFOR "user name:" 5
  8.       IF WAITFOR
  9.          TRANSMIT "<UserName>^M"
  10.          WAITFOR "Password:" 30
  11.          IF WAITFOR
  12.             TRANSMIT "<Password>^M"
  13.             WAITFOR "Command:"
  14.             IF WAITFOR
  15.                TRANSMIT "SCAN INBOX^M"
  16.                EXIT
  17.             ENDIF
  18.          ENDIF
  19.       ENDIF
  20.    ENDIF
  21.    HANGUP
  22.    MESSAGE "Could not connect" "NO CONNECT" retrycancel iconquestion
  23. ENDWHILE
  24. EXIT
  25.