Oprettelse af en e-mail- management program inde i din Microsoft Access-database kan gøre din Access-program mere værdifulde og mere dynamisk. I VBA kan du bruge Microsoft Outlook Object Library til at skabe e-mail og adgang e-mail mapper i Microsoft Outlook. Biblioteket giver dig mulighed for programmering oprette og sende en e-mail uden at skulle åbne Outlook. Brug dette bibliotek til at sende e-mails automatisk til brugere med database oplysninger, der er vigtige for dem . Instruktioner
1

Klik på " Database Tools " fanen , klik på " Visual Basic ", og klik på "Indsæt "-menuen. Klik på " Modul " for at indsætte en ny VBA-kode modul.
2

Klik på menuen "Funktioner" og klik på "Referencer" . Afkryds feltet ved siden af ​​" Microsoft Outlook Object Library " og klik " OK".
3

Opret en ny sub procedure og definere Outlook objekter ved at tilføje følgende VBA-kode : Hej

Private Sub createEmail ()

Set outlookApp = CreateObject ( " Outlook.Application " )

Dim myItem As Object

Set myItem = outlookApp.CreateItem ( olMailItem )
4

Opret en ny e-mail- konto ved at tilføje følgende kode : Hej

myItem.Subject = " e-mailens emne "

myItem.Body = " mail "

myItem.To = " [email protected] "

myItem.Send
5

Rediger det forrige trin , og indtaste en gyldig e-mail løse ved siden af ​​" myItem.To " for at sende e-mailen . Skriv " End Sub " for at afslutte proceduren og tryk på " F5 " for at køre din procedure og sende e-mailen ved hjælp af Outlook .
6

Læs email i din indbakke mappe og vise det i din nærmeste vindue ved at skabe følgende sub procedure : Hej

Private Sub checkEmail ()

Set OLApp = CreateObject ( " Outlook.Application " )

Set MAPIs = OLApp.GetNamespace ( " MAPI " )

Set outlookFolder = MAPIs.GetDefaultFolder ( olFolderInbox )

For Each myMail I outlookFolder.Items

Debug.Print myMail.Subject

Debug.Print myMail . Krop

Næste myMail

End Sub
7

Tryk på " F5 " for at udføre proceduren.
< br >