Access mail gönderimi ve Outlook güvenlik uyarısı hakkında...

09/02/2016, 21:34

direnist

Merhaba;
Konu ile ilgili sitede araştırma yaptım fakat cevap bulamadım. İşyerimde Access üzerinden toplu olarak mail gönderimi yapan bir uygulama hazırladım. Bu güne kadar arkadaşım tarafından sorunsuz olarak kullanıldı. Bugün aynı uygulamayı aynı kullanıcı kullanmak istediğinde her mail gönderimi öncesinde Outlook güvenlik mesajı çıkıyor. Outlook Güven Merkezin den tüm makroları etkinleştir yaptım. Ama yine bu uyarı çıkmaya devam ediyor. Aynı uygulamayı iş yerinde kendi PC imde çalıştırdığımda bana uyarı vermiyor. Outlook Güven Merkezi altındaki Program Erişim seçeneğide biz kullanıcılara kapalı olduğundan ordan ayarlama yapamıyorum.
Mail gönderme kodu olarak aşağıdaki gibi benzer bir kod kullanıyorum. Yani Docmd.SendObject kullanmıyorum. Sanırım Docmd.SendObject kodu içinde bu uyarının çıkmamasını sağlayan bir durum kontrolü var ama belirttiğim gibi ben aşağıdaki kodu kullanıyorum ve bu kod içinde benzer bir durum kontrolü var ise bilgilerinizi rica ediyorum.
Aşağıdaki kodu örnek amaçlı ekledim. Benim kullandığm kod yapısıda bu şekilde.
Teşekkürler. İyi akşamlar. Saygılar.
Kod:
  Dim OutApp As Object, OutMail As Object
 
  On Error Resume Next
  Set OutApp = GetObject(, "Outlook.Application")
  Set OutMail = OutApp.CreateItem(0)
  With OutMail
    .To = ""
    .CC = ""
    .BCC = ""
    .Subject = "T"
    .Body = ""
    .Attachments.Add ActiveWorkbook.FullName
09/02/2016, 23:07

ozanakkaya

Kodun bulunduğu uygulamayı ekleyiniz.
09/02/2016, 23:34

direnist

Ozan Hocam merhaba;
İlk maile uygulamayı ekledim. Teşekkürler.
12/02/2016, 21:34

atoz112

sayın direnist,

bahsettiğiniz talebinize yönelik olarak;
belki aşağıda bağlantısı yazılı konuyu incelemeniz faydalı olabilir.

access üzerinden outlook hatası

bilginize...iyi çalışmalar,saygılar.
13/02/2016, 01:15

direnist

Merhaba Atoz ve Ozan Hocam;
Bilgisayarında 2 gün önce mail gönderiminde güvenlik uyarısı çıkan arkadaşımda nasıl olduğunu bilmediğim şekilde bugün bu uyarı vermeden mail gönderimlerini tekrar yaptı.
Gönderdiğiniz linkleride inceleyeceğim. Umarım tekrarlamaz.
Bilgiler ve ilginiz için çok teşekkür ederim.
Saygılar.