+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Gizli Pencere Modunda Mail Göndermiyor (/konu-gizli-pencere-modunda-mail-gondermiyor.html)
Gizli Pencere Modunda Mail Göndermiyor - Viruse1980 - 08/01/2021
Değerli Accesstr Dostları;
Hazırladığım talep programında iki farklı forma mail butonu ekledim. Bu sayede yetkili kullanıcı firmalara analiz veya teklif için direk mail atabilecekler.
Programı Shift ile açıp çalıştırdığımda maili gönderiyor, sorun yok. Ancak Access pencerelerini gizleyip göndermeye çalıştığımda Vba maili göndermiyor.
Daha önce hazırladığım başka bir uygulamada hiç sorun olmamıştı. Tüm ayarları ve references' leri kontrol etmeme rağmen sorunu bir türlü çözemedim.
Yardımlarınız için şimdiden teşekkürler.
Nto: Mailler frm_YB_003_cariliste formunda Cari Ünvanına çift tıklayınca çalışıyor. Birde frm_YB_004_karsilastirma formunda "Fiyat İste" butonlarında çalışıyor.
RE: Gizli Pencere Modunda Mail Göndermiyor - ozanakkaya - 08/01/2021
Merhaba, doğru yere mi baktım bilmiyorum ama, kod içerisinde "cbx_firma01" adında denetim olmasına rağmen frm_YB_003_cariliste isimli formda bu isimde denetim yok.
RE: Gizli Pencere Modunda Mail Göndermiyor - Viruse1980 - 08/01/2021
Selam
cbx_firma01 dediğim karşılaştırma tablosunda var hocam. O formda 4 adet combobox var. açılır listenin Column değerini verdim. Diğer cari liste formunda alt formdaki değeri aldım
RE: Gizli Pencere Modunda Mail Göndermiyor - ozanakkaya - 08/01/2021
Me.cbx_firma03.Column(1) kodunu "frm_YB_004_karsilastirma" isimli formda kullanabilirsiniz, ancak bu denetim "frm_YB_003_cariliste" formunda yok. Olmadığı için kod çalışmaz. Pencere gizlemeseniz de çalışmaz. Benim gözden kaçırdığım bir şey mi var diye bakıyorum, yok.
RE: Gizli Pencere Modunda Mail Göndermiyor - Viruse1980 - 09/01/2021
Ustam kodları başka bir Access çalışmamda kullanıyorum sorun olmuyor. Ancak aynı kodları buraya attığımda outlooka düşmüyor bile. PDF olarak dışarı aktarmada sorun yok. Kullandığım kodlar;
Dim oApp As New Outlook.Application
Dim oEmail As Outlook.MailItem
Dim fileName As String, todayDate As String
todayDate = Format(Now, "dd.mm.yyyy")
fileName = Application.CurrentProject.Path & "\Gonderilen\" & todayDate & " Tarihli Sefer Raporu.pdf"
DoCmd.OutputTo acReport, "rpr_YB_006_talep", acFormatPDF, fileName, False
Set oEmail = oApp.CreateItem(olMailItem)
With oEmail
.Recipients.Add rfr_mail
'.Recipients.Add Dlookup ("mail_2", "tbl_0001_DB_Mail")
'.Recipients.Add Dlookup ("mail_3", "tbl_0001_DB_Mail")
.Subject = "Gün Sonu Araç Sefer Raporu"
.Body = "Bu Mesaj Mruva Yazılım Tarafından Otomatik Oluşturulmuştur. Cevap Yazmayınız"
.Attachments.Add fileName
.Send
End With
RE: Gizli Pencere Modunda Mail Göndermiyor - Viruse1980 - 10/01/2021
Sorun Çözüldü
Kodlarda hata yokmuş, sorun rapor sayfasının alt formunda ki hayalı Vba kodundan kaynaklanıyormuş, Düzeltildi. Teşekkür ederim