Å vite hvordan å lage et e-postprogram kan spare deg for tid når du trenger å kontrollere e-post for brukerne . Den enkleste måten å opprette et e-postprogram er ved hjelp av Microsoft Office Outlook . Outlook er en post styringssystem som gir deg alle verktøyene som kreves for å administrere e-post . Du kan bruke Visual Basic.NET ( VB.NET ) for å opprette et e-postprogram ved å bruke Outlook Application objektet . VB.NET er et programmeringsspråk som brukes til å lage Windows applikasjoner som e-postprogrammer. Du trenger
Microsoft Visual Basic Express
Microsoft Office
Vis flere instruksjoner
en

start Microsoft Visual Basic Express , og klikk " Nytt prosjekt " på venstre ruten på skjermen . Velg " Windows Forms Application ". Klikk "OK".
2

Dobbeltklikk på " Button" på " Toolbox" -panelet for å legge til en ny knapp kontroll. Dobbeltklikk på " Liste- " for å legge til en ny List Box kontroll. Dobbeltklikk på " Button1 " for å åpne " Form1.vb " modulen.
3

Kopier og lim inn følgende kode under " button1_click " for å lese e-post i "Innboks" -mappen i Outlook og legge til data til Liste- kontroll : en

Dim otlkApp Som Outlook.Application = Ny Outlook.Application

Dim otkMailItem = " IPM.Note "

Dim olkNspace Som Outlook . namespace = otlkApp.GetNamespace ( " MAPI ")

Dim otlkInbox Som Outlook.MAPIFolder = olkNspace.GetDefaultFolder _

( Outlook.OlDefaultFolders.olFolderInbox )

Dim otlkMItems As Outlook.Items = otlkInbox.Items

Dim otlkMsg Som Outlook.MailItem

Dim yCntr As Integer

For yCntr = 1 To otlkMItems.Count
p Hvis otlkMItems.Item ( yCntr ) . meldingsklassen = otkMailItem Deretter

otlkMsg = Hvis

Neste

otlkApp = Ingenting

olkNspace = Ingenting

otlkMItems = Ingenting

otlkMsg = Ingenting
4

Klikk på " Form1.vb [Design ] "-fanen og dobbeltklikk på " Button2 " for å åpne " Button2_Click " prosedyre . Skriv inn følgende under " Button2_Click " for å sende en e-post : en

Dim otlkApp Som Outlook.Application = Ny Outlook.Application

Dim myOtlkMail Som Outlook.MailItem

myOtlkMail = otlkApp . CreateItem ( Outlook.OlItemType.olMailItem )

myOtlkMail.UnRead = sant

myOtlkMail.To = " your.emailaddress @ xxxx.com "

myOtlkMail.Subject = " underlagt går her "

myOtlkMail.HTMLBody = sant

myOtlkMail.Body =" Brødtekst går her "

myOtlkMail.Send ( )

Rediger etter linjer med kode , og skriv målet e-postadresse :

myOtlkMail.To = your.emailaddress @ xxxx.com
5

Trykk " F5 " for å kjøre programmet , og klikk deretter " Button1 " å lese "Innboks" -mappen i Outlook . Klikk " Button2 " for å sende en e-post .