+- 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ığı: Access'ten mail gönderme (/konu-access-ten-mail-gonderme.html)
Sayfalar:
1
2
Cvp: Access'ten mail gönderme - ozanakkaya - 27/12/2015
Malesef test etme imkanım olmadı.
'---------------------------------------------------------------
strBody = ""
strBody = strBody & " Sn. " & Me.g_kimlik
strBody = strBody & " Kesintiniz : " & [fiyat_dalt].Form![d_metraj]
strBody = strBody & " Maaş Tutarınız : " & [fiyat_dalt].Form![d_en]
'---------------------------------------------------------------kodunu aşağıdaki ile değiştirerek deneyiniz.
'---------------------------------------------------------------
strBody = ""
strBody = " Sn. " & Me.g_kimlik & Chr(13) & Chr(10)
strBody = strBody & " Kesintiniz : " & Space(20) & "Maaş Tutarınız:" & Chr(13) & Chr(10)
Me.fiyat_dalt.SetFocus
DoCmd.GoToRecord , , acFirst
For a = 0 To Trim(Forms!fiyatsorgu!fiyat_dalt.Form.RecordsetClone.RecordCount) - 1
strBody = strBody & [fiyat_dalt].Form![d_metraj] & Space(20) & [fiyat_dalt].Form![d_en] & Chr(13) & Chr(10)
Me.fiyat_dalt.SetFocus
DoCmd.GoToRecord , , acNext
Next a
strBody = strBody
Me.g_musteri.SetFocus
'---------------------------------------------------------------Ayrıca, sorunuza cevap yazılmamış ise önceki mesajınızı düzenlemeyiniz. Konunuza yeni cevap yazarak üst sıraya çıkarabilirsiniz.
Cvp: Access'ten mail gönderme - mehmetb84 - 27/12/2015
Sn. XXXX
Kesintiniz Maaş Tutarınız 11 45 16 49
şeklinde geliyor. Aşağıda gönderdiğim gibi alt alta gelmesini istiyordum.
Sn. XXXX
Kesintiniz : 11
Maaş Tutarınız :45
Kesintiniz : 16
Maaş Tutarınız :49
Cvp: Access'ten mail gönderme - ozanakkaya - 30/12/2015
İnceleyiniz. Eklediğim metin kutusunu gizleyebilirsiniz.
Cvp: Access'ten mail gönderme - mehmetb84 - 30/12/2015
çok teşekkürler Ozan Bey, ellerinize sağlık.