Kazalo
Morda boste želeli dobiti seznam vseh odbijenih e -poštnih sporočil iz Outlooka. Ta koda vam bo pomagala začeti:
| 1234567891011121314151617181920212223242526 | Zatemni OutOutlook kot nov Outlook.ApplicationZatemni imenski prostor kot Outlook.NameSpaceZatemni myInbox kot Outlook.MAPIFolderZatemni elemente kot Outlook.ItemsZatemni element kot predmetNastavi outNamespace = outOutlook.GetNamespace ("MAPI")Nastavi myInbox = outNamespace.GetDefaultFolder (olFolderInbox)Set outItems = myInbox.ItemsDoCmd.Hourglass True'Pridobite neuspešna e -poštna sporočilaZa vsak outItem V outItemsČe je InStr (outItem.Subject, "Obvestilo o stanju dostave (napaka)")> 0 PotemDebug.Print outItem.SubjectKonec ČeNaslednjiDoCmd.Hourglass FalseSet outOutlook = NičSet outNamespace = NičSet outItem = Nič |
https://bytes.com/topic/access/answers/954203-retrieve-list-bounced-email-addresses-outlook-into-access
