Mail Olarak Gidenlerin Yanına Yazdırma

Hocam,

Kodu gerekli yerde kullandım fakat gönderildi yazısını alamadım ayrıca tablodaki mevcut durum yerini değişmesin mailolarakgidenler tablosunda mail kontrol alanına yazsın

Kodu aşağıdaki ile değiştirin.

DoCmd.SendObject acQuery, "mail", "ExcelWorkbook(*.xlsx)", "hamzaalmali@vangoluedas.com.tr", "ozkanakman@vedas.com.tr", "", "Deneme", "Bu Bir Deneme Yazısıdır", True, ""

DoCmd.RunSQL "INSERT INTO mailolarakgidenler ( kod, kaynak, tarih, tesis, bolum, tespit_eden, gozlem, oneriler, sorumlu, termin_tarihi, sorumlu_gorusu, tamamlama_tarihi, durum, mail_kontrol ) SELECT kod, kaynak, tarih, tesis, bolum, tespit_eden, gozlem, oneriler, sorumlu, termin_tarihi, sorumlu_gorusu, tamamlama_tarihi, durum, 'Gönderildi' FROM mail;"

bu kod ile gönderildi mesajı gelmez. Mail istemcisine (Outlook, Thunderbird vs.) yeni mail olarak ekler, siz göndere basarsanız gönderir.