- Reading the incoming emails via MS Exchange
Reading the incoming emails via MS Exchange The following code is using MS Exchange to read the new incoming emails. The in-box of MS Exchange is updated once the email session is started: the emails found on the server are transferred into MS Exchange. A profile ("PROFILE_Example") was created in MS Exchange. For more details on how to create profiles, see EmailStartSession.
EmailID is int
// Start the email session
EmailID = EmailStartSession("PROFILE_Example")
// Retrieve the messages in the in-box of MS Exchange
EmailUpdate(EmailID)
// Browse the new incoming messages from the first one to the last one
EmailReadFirst(EmailID, "NOT READ")
WHILE Email.Out = False
IF YesNo("You have received an email from" + Email.Sender + ...
"Do you want to read it?") THEN
// Open the window for reading messages
Open(WIN_Email_RCV)
ELSE
EmailReadNext(EmailID, "NOT READ")
END
END
...
EmailCloseSession(EmailID)
This page is also available for…
|
|
|
|