Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte aplikáciu Microsoft Access 2007 . Kliknite na " Databázové nástroje " a vyberte " Visual Basic " . Zvoľte menu " Nástroje " a kliknite na " Referencie " . Zaškrtnite políčko vedľa " Microsoft Outlook ( číslo verzie ) objektovej knižnice . " Kliknite na tlačidlo " OK " .
2
skopírujte a vložte nižšie uvedený kód do vášho nového modulu . Kód bude čítať zložku " Doručená pošta " v aplikácii Microsoft Outlook e - mailu a zobraziť predmet a telo prostredníctvom okne so správou .
Private Sub ReadOutlookMail ( )
Set otlkApp = CreateObject ( " Outlook.Application " )
Set MAPISpace = otlkApp.GetNamespace ( " MAPI " )
Set otlkFolder = MAPISpace.GetDefaultFolder ( olFolderInbox )
každý MailItem V otlkFolder.Items
MsgBox " Predmet : " & MailItem.Subject a " telo " a MailItem.body
Ďalšie MailItem
End Sub
3
Stlačením tlačidla " F5 " spustiť " ReadOutlookMail " podprogram .