Asp Kodumla ilgili bir soru Cevaplayan olursa sevinrim

Arkadaşlar hazır bir alışveriş sitesi üzerinde çalışıyorum. Sorunları çözdüm ama bir sorun başıma bela oldu. Kullanızı ürünleri seçiyor adını soyadını adresini yazıyor üstte daha önce seçtiği ürünleri okeyleyince site sahibinin mailine alış verişle ilgili ürünlere ait bilgiler geliyor geliyor ama karma karışık bu karşmaılıklığı nasıl düzeltmeliyim.

İşte gelen ileti :Yeni bir siparis var hadi hayirlisi...Adi Soyadi :::::::::::::::::::::::::::::: sinan - uzun ülke :::::::::::::::::::::::::::::: Türkiye Sehir :::::::::::::::::::::::::::::: Trabzon Adres :::::::::::::::::::::::::::::: Geyikli Ilkögreitm Okulu Telefon :::::::::::::::::::::::::::::: 9498023232 Mail :::::::::::::::::::::::::::::: sinanuzun@e-kolay.net Mesaj :::::::::::::::::::::::::::::: denceek yok kardes ver ............ Miktari : 1 Ürün Kodu : H_4llw Ürün Cinsi : Hamsi Birim Fiyati : 15,00 Toplam Fiyat : 15,00 ............ Miktari : 1 Ürün Kodu : V_Ekmek_2 Ürün Cinsi : Vakfi Kebir Ekmegi Birim Fiyati : 10,00 Toplam Fiyat : 10,00 ............ Miktari : 1 Ürün Kodu : V_Ekmek_2 Ürün Cinsi : Vakfi Kebir Ekmegi Birim Fiyati : 10,00 Toplam Fiyat : 10,00 ............ Miktari : 1 Ürün Kodu : f.saias1 Ürün Cinsi : Findik Birim Fiyati : 6,00 Toplam Fiyat : 6,00 ............ ======================================== Alisveris Toplami (KDV Dahil) : 41,00

Ben istiyorum ki Her bilig altta alta olsun sanırım bu işi yapan kod kısmını doğru bir şekilde aşağıda paylaştım yardım edersneiz sevinirim arkadaşlar.


<td valign="top" colspan="2" height="419" width="549">
<%mailtext = mailText & "Adý Soyadý " & " :::::::::::::::::::::::::::::: " & request.form("m_name") & chr(13)& chr(10)%>
<%mailtext = mailText & "ülke" & " :::::::::::::::::::::::::::::: " & request.form("m_country") & chr(13)& chr(10)%>
<%mailtext = mailText & "Þehir" & " :::::::::::::::::::::::::::::: " & request.form("m_city") & chr(13)& chr(10)%>
<%mailtext = mailText & "Adres" & " :::::::::::::::::::::::::::::: " & request.form("m_street") & chr(13)& chr(10)%>
<%mailtext = mailText & "Telefon" & " :::::::::::::::::::::::::::::: " & request.form("m_phone") & chr(13)& chr(10)%>
<%mailtext = mailText & "Mail" & " :::::::::::::::::::::::::::::: " & request.form("m_mailadress") & chr(13)& chr(10)%>
<%mailtext = mailText & "Mesaj" & " :::::::::::::::::::::::::::::: " & request.form("m_comment") & chr(13)& chr(10)%>

<%
ok = 0
if m_name = true then orderPerson = OrderPerson & l_name & ": " & checkField(request.form("m_name")) & chr(10) & chr(13)
if m_city = true then orderPerson = OrderPerson & l_city & ": " & checkField(request.form("m_city")) & chr(10) & chr(13)
if m_street = true then orderPerson = OrderPerson & l_street & ": " & checkField(request.form("m_street"))& chr(10) & chr(13)
if m_country = true then orderPerson = OrderPerson & l_country & ": " & checkField(request.form("m_country"))& chr(10) & chr(13)
if m_phone = true then orderPerson = OrderPerson & l_phone & ": " & checkField(request.form("m_phone"))& chr(10) & chr(13)
if m_mailadress = true then orderPerson = OrderPerson & l_mailadress & ": " & checkField(request.form("m_mailadress"))& chr(10) & chr(13)
if m_card_type = true then orderPerson = OrderPerson & l_card_type & ": " & checkField(request.form("m_card_type"))& chr(10) & chr(13)
if m_card_number = true then orderPerson = OrderPerson & l_card_number & ": " & checkField(request.form("m_card_number"))& chr(10) & chr(13)
if m_card_expiration_date = true then orderPerson = OrderPerson & l_card_expiration_date & ": " & checkField(request.form("m_card_expiration_date"))& chr(10) & chr(13)
if m_comment = true then orderPerson = OrderPerson & l_comment & ": " & checkField(request.form("m_comment"))& chr(10) & chr(13)

if ok = 0 then
warenkorb = session("warenkorb")
if isArray(warenkorb) then
i = session("items")
mailText = mailText & chr(13) & chr(10) & chr(13) & chr(10)
mailText = mailText & orderPerson & chr(13) & chr(10)
mailtext = mailText & "............" & chr(13) & chr(10)
for t = 0 to i
if (warenkorb(t,0)) <> "" then
gesamt_artikel = + warenkorb(t,0) * warenkorb(t,2)
gesamt = FormatNumber(gesamt + gesamt_artikel,2,,-2)
mailText = mailText & l_list1 & " : " & warenkorb(t,0) & chr(13)& chr(10)
mailText = mailText & l_list2 & " : " & warenkorb(t,3) & chr(13)& chr(10)
mailText = mailText & l_list3 & " : " & warenkorb(t,4) & chr(13)& chr(10)
mailText = mailText & l_list4 & " : " & FormatNumber(warenkorb(t,2),2,,-2) & chr(13)& chr(10)
mailtext = mailtext & l_list5 & " : " & FormatNumber(gesamt_artikel,2,,-2)& chr(13) & chr(10)
mailtext = mailText & "............" & chr(13) & chr(10)

end if
next
mailtext = mailText & "========================================" & chr(13) & chr(10)
mailtext = mailtext & l_list6 & " : " & FormatNumber(gesamt,2,,-2)[/b]
if mail_component = "jmail" then [/color] Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = mail_host & ":25"
JMail.Sender = mail_sender
JMail.Subject = mail_subject
JMail.addrecipient mail_empfaenger
JMail.Body = mailText
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
Set JMail = nothing
session.abandon
else

hocam &chr(13)&chr(10) yerine &vbCrLf kullanmayı deneyin.

satırların sonuna <br> koyman gerekiyor.

<td valign="top" colspan="2" height="419" width="549">
<%mailtext = mailText & "Adý Soyadý " & " :::::::::::::::::::::::::::::: " & request.form("m_name") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "ülke" & " :::::::::::::::::::::::::::::: " & request.form("m_country") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "Þehir" & " :::::::::::::::::::::::::::::: " & request.form("m_city") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "Adres" & " :::::::::::::::::::::::::::::: " & request.form("m_street") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "Telefon" & " :::::::::::::::::::::::::::::: " & request.form("m_phone") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "Mail" & " :::::::::::::::::::::::::::::: " & request.form("m_mailadress") & chr(13)& chr(10)%> <br>
<%mailtext = mailText & "Mesaj" & " :::::::::::::::::::::::::::::: " & request.form("m_comment") & chr(13)& chr(10)%> <br>

Sağolun sevgili arkadaşlar ama ikiside çözüm olmadı.

gönderdiğin maili html olarak kodlamalısın hocam

JMail.contenttype="text/html" eklemesini yap

ve


sendeki JMail.Body = mailText i

JMail.htmlBody = mailText

ile değişikliği yap

dönüş yapmadınız hocam, oldu mu? olmadı mı? bilsek iyi olurdu.

olmadı hocam şimdi hata veriyor iletide atmıyor.

Acaba yanlış yere mi yapıştrdım kodları tam olarka nereye yapıştırmalıyım ?

mailtext = mailText & "========================================" & chr(13) & chr(10)
mailtext = mailtext & l_list6 & " : " & FormatNumber(gesamt,2,,-2)[/b]
if mail_component = "jmail" then [/color] Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.contenttype="text/html"
JMail.ServerAddress = mail_host & ":25"
JMail.Sender = mail_sender
JMail.Subject = mail_subject
JMail.addrecipient mail_empfaenger
JMail.htmlBody = mailText
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
Set JMail = nothing
session.abandon
else

değiştirmen gereken yenleri eğik olarak yazdım

Yardımların için teşekkür ederim sevgili hocam ama olmadı hala yardıma ihtiyacım var

hocam senin sorununu <br> komutu çözer. Söylediğim gibi olmadıysa kodların içine alarak dene
Şu şekilde :
<td valign="top" colspan="2" height="419" width="549">
<%mailtext = mailText & "Ad&yacute; Soyad&yacute; " & " :::::::::::::::::::::::::::::: " & request.form("m_name") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "ülke" & " :::::::::::::::::::::::::::::: " & request.form("m_country") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "&THORN;ehir" & " :::::::::::::::::::::::::::::: " & request.form("m_city") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "Adres" & " :::::::::::::::::::::::::::::: " & request.form("m_street") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "Telefon" & " :::::::::::::::::::::::::::::: " & request.form("m_phone") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "Mail" & " :::::::::::::::::::::::::::::: " & request.form("m_mailadress") & chr(13)& chr(10)<br>%>
<%mailtext = mailText & "Mesaj" & " :::::::::::::::::::::::::::::: " & request.form("m_comment") & chr(13)& chr(10)<br>%>

Hocam bu kezde hata verdi işe yaramadı ne yazık ki