Veta hur man skapar ett e-postprogram kan du spara tid när du behöver kontrollera e-post för användarna . Det enklaste sättet att skapa en e- ansökan är att använda Microsoft Office Outlook . Outlook är ett mail system som ger dig alla de verktyg som krävs för att hantera e-post . Du kan använda Visual Basic.NET ( VB.NET ) för att skapa ett e-postprogram genom att använda objektet Outlook ansökan . VB.NET är en dator programmeringsspråk som används för att skapa Windows-program som t.ex. e-postprogram . Saker du behöver
Microsoft Visual Basic Express Review Microsoft Office
Visa fler instruktioner
1
Starta Microsoft Visual Basic Express , och klicka på " Nytt projekt " på vänster på skärmen . Välj " Windows Forms Application . " Klicka på " OK . "
2
Dubbelklicka på " knappen " på " Toolbox " rutan för att lägga till en ny knapp kontroll . Dubbelklicka på " ListBox " för att lägga till en ny kontroll listruta. Dubbelklicka på " Button1 " för att öppna " Form1.vb " modul .
3
Kopiera och klistra in följande kod under " Button1_Click " för att läsa e-post i " Inkorgen " -mappen i Outlook och lägga till data till ListBox kontroll :
Dim otlkApp som Outlook.Application = Ny Outlook.Application
Dim otkMailItem = " IPM.Note "
Dim olkNspace som Outlook . namespace = otlkApp.GetNamespace ( " MAPI " ) katalog
Dim otlkInbox Som Outlook.MAPIFolder = olkNspace.GetDefaultFolder _
( Outlook.OlDefaultFolders.olFolderInbox ) katalog
Dim otlkMItems As Outlook.Items = otlkInbox.Items
Dim otlkMsg Som Outlook.MailItem
Dim yCntr As Integer
För yCntr = 1 att otlkMItems.Count
p Om otlkMItems.Item ( yCntr ) . MessageClass = otkMailItem Sedan
otlkMsg = Om
Nästa
otlkApp = ingenting
olkNspace = ingenting
otlkMItems = ingenting
otlkMsg = ingenting
4
Klicka på " Form1.vb [ Design ] " -fliken och dubbelklicka på " Button2 " för att öppna " Button2_Click " förfarande . Skriv följande under " Button2_Click " för att skicka ett mail :
Dim otlkApp Som Outlook.Application = Ny Outlook.Application
Dim myOtlkMail Som Outlook.MailItem
myOtlkMail = otlkApp . CreateItem ( Outlook.OlItemType.olMailItem ) katalog
myOtlkMail.UnRead = Sant
myOtlkMail.To = " your.emailaddress @ xxxx.com "
myOtlkMail.Subject = " ämne går här "
myOtlkMail.HTMLBody = Sant
myOtlkMail.Body = " Brödtext går här "
myOtlkMail.Send ( ) katalog
Redigera följande rader med kod och skriv in adressen destination email :
myOtlkMail.To = your.emailaddress @ xxxx.com
5
Tryck " F5 " för att köra ditt program , och klicka sedan på " Button1 " att läsa " Inkorgen " -mappen i Outlook . Klicka " Button2 " för att skicka ett mail .
