Cómo acceder a correo electrónico con Visual Basic

Conocer cómo acceder a elementos de Microsoft Outlook con Microsoft Access y Visual Basic para Aplicaciones o VBA , es útil cuando se está desarrollando aplicaciones de correo electrónico . Outlook es un sistema de gestión de correo electrónico ofrecido por Microsoft y se incluye en la suite de Microsoft Office. Microsoft Access es un sistema de gestión de base de datos relacional también es parte de la suite de Office. VBA es un lenguaje de programación de Microsoft se utiliza para automatizar tareas rutinarias dentro de las aplicaciones de Microsoft Office. Instrucciones
1

Inicie Microsoft Access 2007 , haga clic en "Herramientas de base de datos" y seleccione "Visual Basic ". Seleccione el menú " Herramientas" y haga clic en "Referencias ". Marque la casilla junto a " Perspectivas 12.0 Biblioteca de objetos de Microsoft " y haga clic
2

Escriba lo siguiente para crear un nuevo subprograma "OK . "

GetOutlookMail Sub Private ()

a continuación, pulse " Enter".
3

Escriba el siguiente para establecer sus variables:

Set outlookApp = CreateObject ( " Outlook.Application ")

Set MAPISpace = outlookApp.GetNamespace ( " MAPI " )

Set outlookFolder = MAPISpace.GetDefaultFolder ( olFolderInbox )
4

Escriba lo siguiente para mostrar Pronóstico:

outlookFolder.Display
5

Escriba lo siguiente para recorrer todos los elementos de correo electrónico y mostrar el tema en un cuadro de mensaje :

For Each MyMail en outlookFolder.Items

MsgBox myMail.Subject

Siguiente MyMail

Press "F5 " para ejecutar la subrutina .