Créer un objet de courriel. L'objet de courrier électronique contient toutes les propriétés et fonctions utilisées pour lire des emails. Le code suivant crée l'objet:
set envoyer = CreateObject ("EasyMail.POP3")
Entrez le nom du serveur de nom d'utilisateur et mot de passe. Ceux-ci sont fournis par votre fournisseur email hôte. Si vous êtes sur un réseau interne, l'information est fournie par un administrateur réseau. Le code suivant vous montre comment entrer dans les propriétés de l'objet d'e-mail:
email.MailServer ="email_server.domain.com"
email.Account ="nom d'utilisateur"
email.Password ="mot de passe"
Ouvrez l'e-mail et de télécharger les messages. Les messages électroniques sont conservés dans un objet tableau. Le code suivant ouvre la connexion et enregistre le premier message à une variable de VB:
email.Connect
message = email.DownloadSingleMessage (1)
Afficher le message à l'utilisateur. Dans cet exemple, le message est affiché dans une boîte de message. Cela vous permet de tester le code pour assurer que le message est téléchargé entièrement. Le code suivant affiche le message:
message MsgBox
Déconnectez-vous du serveur de messagerie. Déconnexion libère des ressources et ferme la connexion au serveur. Le code suivant ferme votre connexion:
email.Disconnect