home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Perseus
/
PERSEUS.iso
/
windows
/
applikat
/
uc3h1.exe
/
MCI.SCR
< prev
next >
Wrap
Text File
|
1992-08-15
|
599b
|
25 lines
MESSAGE "STANDBY FOR MCI MAIL" "MCIMail"
WHILE NOT CANCEL
SEND "ATDT 9,1800 333-1818^M"
WAITFOR "CONNECT"
IF WAITFOR
TRANSMIT "^M"
WAITFOR "user name:" 5
IF WAITFOR
TRANSMIT "<UserName>^M"
WAITFOR "Password:" 30
IF WAITFOR
TRANSMIT "<Password>^M"
WAITFOR "Command:"
IF WAITFOR
TRANSMIT "SCAN INBOX^M"
EXIT
ENDIF
ENDIF
ENDIF
ENDIF
HANGUP
MESSAGE "Could not connect" "NO CONNECT" retrycancel iconquestion
ENDWHILE
EXIT