(25/04/2016, 12:41)kadirdursun yazdı: Bu örneği inceledim ve 1. mesaja uyarlamıştım.
Bu haliyle işimi pek görmedi.
Mail gövdesine tablo şeklinde eklenmesini istiyorum.

Kadir bey,  1. mesajdaki örnek uygulamanızda 

.Body = "TARİH: " & Me.TARIH & "" _

& Chr(10) & Chr(10) & "Başvuru No: " & Me.BASVURU_NO & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "Durum : " & Me.DURUM & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "İlçe: " & Me.ILCE & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "Adı Soyadı: " & Me.ADI_SOYADI & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "Telefon: " & Me.TELEFON & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "Adres: " & Me.ADRES & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & "Şikayet: " & Me.SIKAYET & "" _

& Chr(10) & "__________________________________________________________________________________________________________________________________________________" & "" _

& Chr(10) & Chr(10) & " Cevap Tarihi: " & Me.CEVAP_TARIHI & "" _

& Chr(10) & Chr(10) & " Cevap : " & Me.CEVAP & "" _

& Chr(10) & Chr(10) & "LÜTFEN EN KISA ZAMANDA CEVAPLAYINIZ"

şeklinde kodlama bulunmaktadır.
Ancak, benim bağlantısını verdiğim uygulamadaki çözümde ilgili kodlama aşağıdaki gibi,

mtn_body = mtn_body & "<table><tbody><tr><td style='width:100px;'>Kalite:</td><td style='width:100px;'>En:</td><td style='width:100px;'>Metraj:</td></tr><tr>"



For a = 0 To Trim(Forms!fiyatsorgu!fiyat_dalt.Form.RecordsetClone.RecordCount) - 1

mtn_body = mtn_body & "<td>" & [fiyat_dalt].Form![d_kalite] & "</td>"

mtn_body = mtn_body & "<td>" & [fiyat_dalt].Form![d_metraj] & "</td>"

mtn_body = mtn_body & "<td>" & [fiyat_dalt].Form![d_en] & "</td>"

mtn_body = mtn_body & "<tr></tr>"

Me.fiyat_dalt.SetFocus

DoCmd.GoToRecord , , acNext

Next a

mtn_body = mtn_body & "</tr></tbody></table>"

mtn_body = mtn_body

Yani body kısmına Html tablo tagları ekliyor.