Saper leggere la posta elettronica da Microsoft Office Outlook utilizzando Microsoft Visual Basic, consentono di sviluppare applicazioni di posta elettronica potente. Outlook è un sistema di gestione di posta elettronica che è incluso nella suite Microsoft Office. Visual Basic è un computer orientato agli oggetti linguaggio di programmazione che è spesso preferito dai programmatori per la sua flessibilità e facilità d'uso. In pochi passi è possibile creare un'applicazione Windows di Visual Basic che leggerà la tua casella di posta di Outlook e visualizzare il contenuto di e-mail attraverso la finestra della console.

Istruzioni

1

Aprire Microsoft Visual Basic Express e fai clic su "nuovo progetto" nel riquadro sinistro dello schermo. Fare doppio clic su "Applicazione Console". Premere "Ctrl" e "A" e quindi premere "Elimina" per rimuovere il codice che c'è.

2

Copiare e incollare il codice seguente al modulo "Module1. vb" per leggere gli elementi di posta elettronica nella posta in arrivo di Outlook:

Le importazioni Microsoft.Office.Interop

Module Module1

Sub Main()

Dim otkApp As Outlook.Application = New Outlook.Application

Dim otkMailItem = "IPM.Note"

Dim otkNameSpace As Outlook.NameSpace = otkApp.GetNamespace("MAPI")

Dim otkInboxFolder As Outlook.MAPIFolder = otkNameSpace.GetDefaultFolder _

(Outlook.OlDefaultFolders.olFolderInbox)

Dim otkMailItems As Outlook.Items = otkInboxFolder.Items

Dim otkMessage As Outlook.MailItem

Dim iCntr As Integer

For iCntr = 1 To otkMailItems.Count

If otkMailItems.Item(iCntr).MessageClass = otkMailItem Then

otkMessage = otkMailItems.Item(iCntr)

Console.WriteLine(iCntr)

Console.WriteLine(otkMessage.SenderName)

Console.WriteLine(otkMessage.Subject)

Console.WriteLine(otkMessage.ReceivedTime)

Console.WriteLine(otkMessage.Body)

Console.WriteLine("______________________________")

End If

Next

otkApp = Nothing

otkNameSpace = Nothing

otkMailItems = Nothing

otkMessage = Nothing

End Sub

End Module

3

Premere "F5" per eseguire il programma.