İçindekiler
Outlook'tan geri dönen tüm e-postaların bir listesini almak isteyebilirsiniz. Bu kod başlamanıza yardımcı olacaktır:
| 1234567891011121314151617181920212223242526 | Outlook'u Yeni Outlook.Application Olarak KarartınOutlook.NameSpace Olarak OutNamespace'i karartınOutlook.MAPIFolder olarak myInbox'ı karartOutlook.Items Olarak Öğeleri KarartınNesne Olarak Öğeyi karartoutNamespace = outOutlook.GetNamespace("MAPI") olarak ayarlayınmyInbox = outNamespace.GetDefaultFolder(olFolderInbox) olarak ayarlayınset outItems = myInbox.ItemsDoCmd.Kum Saati Doğru'Başarısız E-postaları AlOutItems içindeki her bir öğe içinInStr(outItem.Subject, "Teslim Durum Bildirimi (Arıza)") > 0 iseDebug.Print outItem.SubjectBitirSonrakiDoCmd.Kum Saati YanlışOutlook'u ayarla = Hiçbir şeySet outNamespace = Hiçbir şeySet outItem = Hiçbir şey |
https://bytes.com/topic/access/answers/954203-retrieve-list-bounced-email-addresses-outlook-into-access
