IF EmailStartSession(USER, PASSWORD, "pop3.providername.com", ...
"smtp.providername.com") = True THEN
UserName = USER
ELSE
UserName = ""
Error("Unable to establish the connection")
END
IF UserName <> "" THEN
EmailCloseSession(UserName)
UserName = ""
END