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.