Sayın atoz112;
Teşekkür ederim.
Dedikleriniz yaptım, ekli olarak mail gönderme işi çözüldü.
Eksiz göndermeyi deneyince
"Error No: -2147024893; Description: Yol yok. Yolun doğruluğunu denetleyin"
uyarı penceresi çıktı karşıma
sayın kadirdursun,
bahsettiğiniz sorununuzun yanıtı için şu bilgilendirmelerin yeterli olacağı kanısındayım.
ek dosya ekleme kod ifadesi için if kullanarak bir kontrol sağlaması yapılması gerektiği görülmektedir.bu nedenle,aşağıdaki kodları;
frmEMailMergeTextBox adlı formunuzdaki Private Sub cmdMergetoEMailMulti_Click() tıklandığında olay yordamı içerisindeki Set msg=appOutlook.CreateItem(olMailItem) satırının bir altında yazılı olan kodlar ile değiştirdiğinizde sorununuz çözüme ulaştırılmış olacaktır kanısındayım.
NOT:kodlama,zaman bulunamadığından dolayı deneme imkanı olmamıştır.siz,denedikten sonra sonucu da bildirebilirsiniz.
Kod:
With msg
.To = strEMailRecipient
.Subject = strSubject
.Body = strBody
If Me.mtn_ekdizini = "" Or IsNull(Me.mtn_ekdizini) Then
Else
.Attachments.Add (Me.mtn_ekdizini)
.Send
End If
End With
bilginize...iyi çalışmalar,saygılar.
Sayın atoz112
Dediklerinizi yaptım. Uyarı artık gelmiyor. Fakat eksiz olarak yine mail göndermiyor.
(16/03/2015, 17:20)kadirdursun yazdı: Sayın atoz112
Dediklerinizi yaptım. Uyarı artık gelmiyor. Fakat eksiz olarak yine mail göndermiyor.
atoz112'nin eklediği koddaki
.Send
kodunu
End If
kodunun altına taşıyınız.
With msg
.To = strEMailRecipient
.Subject = strSubject
.Body = strBody
If Me.mtn_ekdizini = "" Or IsNull(Me.mtn_ekdizini) Then
Else
.Attachments.Add (Me.mtn_ekdizini)
End If
.Send
End With
sayın kadirdursun,
öncelikle,yoğunluğum neticesinde;gecikmeli yanıt vermek durumunda kaldığım ve sizi cevap beklemeye yönlendirdiğim için özür dilerim.
fakat,sayın Ozan bey gerekli düzeltme bilgisi içeren yanıtlarını açıklamışlar.kendilerine teşekkürler bu arada.
konunuzun 20.mesajının bitiminde de not düşüldüğü gibi,bu yazılan kodlama denenme durumuna dair imkan ve zaman olmadığından dahil edilmişti.kodlamanın yazıldığı metin dosyasından kopyala-yapıştır yaparken,sanırım atlanmış olunacak ki,sayın ozan beyin de dikkat çektikleri gibi,
komutunun düzeltilmesi ile sorununuz çözüme ulaşmış olacaktır.bilginize.
iyi çalışmalar,
saygılar.
Sayın ozanakkaya;
Dediğiniz gibi yaptım. Sorun çözüldü. Hem size hemde Sayın atoz112'ye teşekkür ederim.