Vide, hvordan man opretter en e-mail program kan spare dig tid, når du har brug for at kontrollere e-mail til brugerne. Den nemmeste måde at oprette en e-mail program er ved hjælp af Microsoft Office Outlook. Outlook er et mail- management system , der giver dig alle de nødvendige redskaber til at håndtere e-mail. Du kan bruge Visual Basic.NET ( VB.NET ) for at oprette en e-mail program ved hjælp af Outlook Application objekt. VB.NET er en computer programmeringssprog, der anvendes til at skabe Windows-applikationer såsom e-mail -programmer. Ting du skal
Microsoft Visual Basic Express & Microsoft Office
Vis Flere Instruktioner
1
Start Microsoft Visual Basic Express , og klik på " Nyt projekt " på venstre rude på skærmen. Vælg "Windows Forms Application ". Klik på "OK".
2
Dobbeltklik på " Button " på " Toolbox" ruden for at tilføje en ny knap kontrol. Dobbeltklik på " ListBox " for at tilføje en ny liste Box kontrol. Dobbeltklik på " Button1 " for at åbne " Form1.vb "-modulet .
3
Kopier og indsæt følgende kode under " Button1_Click " for at læse e-mail i "Inbox " mappe i Outlook og tilføje data til ListBox kontrol : Hej
Dim otlkApp Som Outlook.Application = Ny Outlook.Application
Dim otkMailItem = " ipm.note "
Dim olkNspace Da Outlook . NameSpace = otlkApp.GetNamespace ( " MAPI " )
Dim otlkInbox As Outlook.MAPIFolder = olkNspace.GetDefaultFolder _
( Outlook.OlDefaultFolders.olFolderInbox )
Dim otlkMItems As Outlook.Items = otlkInbox.Items
Dim otlkMsg Som Outlook.MailItem
Dim yCntr As Integer
yCntr = 1 til otlkMItems.Count
p Hvis otlkMItems.Item ( yCntr ) . meddelelsesklasse = otkMailItem Så
otlkMsg = Hvis
Næste
otlkApp = Nothing
olkNspace = Nothing
otlkMItems = Nothing
otlkMsg = Nothing
4
Klik på " Form1.vb [ Design ] " fanen og dobbeltklik på " button2 " for at åbne " Button2_Click " procedure. Indtast følgende under " Button2_Click " for at sende en e-mail : Hej
Dim otlkApp Som Outlook.Application = Ny Outlook.Application
Dim myOtlkMail Som Outlook.MailItem
myOtlkMail = otlkApp . CreateItem ( Outlook.OlItemType.olMailItem )
myOtlkMail.UnRead = Sand
myOtlkMail.To = " your.emailaddress @ xxxx.com "
myOtlkMail.Subject = " emne går her "
myOtlkMail.HTMLBody = Sand
myOtlkMail.Body =" Brødtekst går her "
myOtlkMail.Send ()
Rediger efter linjer kode og indtast destinationen email adresse : Hej
myOtlkMail.To = your.emailaddress @ xxxx.com
5
Tryk på " F5 " for at køre dit program og derefter klikke på " Button1 " læse " Inbox" mappe med Outlook. Klik på " button2 " for at sende en e-mail .