Cómo abrir Outlook 2007 con Visual Basic

Tener el conocimiento sobre cómo abrir Outlook y leer su correo electrónico utilizando Visual Basic puede ayudarle a crear fácilmente aplicaciones de correo electrónico. En VB, puede utilizar el espacio de nombres "Microsoft.Office.Interop.Outlook" para la interoperabilidad entre su aplicación VB y Outloook. Una vez establecida la conexión, puede utilizar un bucle, como un "bucle For ..." y recorrer todos los elementos de correo electrónico en una carpeta de Outlook en particular. Con la ayuda de este espacio de nombres que pueda construir su propia aplicación de correo electrónico fácilmente usando VB.NET.

Instrucciones

1 Lanzamiento de Microsoft Visual Basic Express y haga clic en "Nuevo proyecto ..." en el panel izquierdo de la pantalla. Haga doble clic en "Aplicación de consola." Pulse la tecla "Ctrl" y "A" a continuación, pulse "Borrar" para eliminar el código actual.

2 Haga clic en el menú "Proyecto" y haga clic en "Agregar referencia". Haga clic en la pestaña ".NET" y haga doble clic en "Microsoft.Office.Interop.Outlook."

3 Comience por la que se declara el siguiente espacio de nombres por encima de "moduel módulo 1:"

Las importaciones Microsoft.Office.Interop

4 Continuar creando las siguientes variables de objeto de Outlook:

Dim Otlk As Outlook.Application = New Outlook.Application

Dim OtlkItem = "IPM.Note"

Dim OtlkNspace Como Outlook.NameSpace = Otlk.GetNamespace ( "MAPI")

Dim OtlkInbox Como Outlook.MAPIFolder = OtlkNspace.GetDefaultFolder _

(Outlook.OlDefaultFolders.olFolderInbox)

OtlkMlItms dévil como Outlook.Items = OtlkInbox.Items

Dim OtlkMsg Como Outlook.MailItem

Dim xCntr como número entero

5 Copia y pega el código siguiente para crear un "bucle For ..." y mostrar los elementos de correo que se encuentran en la carpeta "Bandeja de entrada" de la Perspectiva:

For xCntr = 1 To OtlkMlItms.Count

Si OtlkMlItms.Item (xCntr) .MessageClass = Entonces OtlkItem

OtlkMsg = OtlkMlItms.Item (xCntr)

Console.WriteLine (xCntr)

Console.WriteLine (OtlkMsg.SenderName)

Console.WriteLine (OtlkMsg.Subject)

Console.WriteLine (OtlkMsg.ReceivedTime)

Console.WriteLine (OtlkMsg.Body)

Console.WriteLine ( "______________________________")

Terminara si

Siguiente

6 Liberar las variables objeto de la memoria:

Otlk = Nothing

OtlkNspace = Nada

OtlkMlItms = Nada

OtlkMsg = Nada