Mail Formda Tr Karekter Sorunu!

20/Mar/08 16:15

Kısayol

Şikayet

Özel Mesaj

streetw1se

Kayıt Tarihi: 22/Eylül/2007

s.a muridleri elimde bir mail form scripti var fakat tr karekter yada bosluk bırakınca maili alamıyorm eğer ing karekter ve bosluksuz girersem calisiyior.bu tr karekter sorununu nasıl çözebiliriz?bilen arkadaslar yardmcı olursa cok sevinirim.herkese kolay gelsin

formmail.asp dosyası

<html>
<head>
<title>FORM</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9">
</head>
<body bgcolor="#FFFFFF" link="#000066">
<table align="center" border="0" width="90%" cellspacing="0" cellpadding="0">
<form method="post" action="mail.asp" name="">
<tr>
  <td align="right" width="100%" colspan="2">
   <table border="0" width="100%" cellspacing="0" cellpadding="0" height="18">
    <tr>
     <td width="30%" height="18">
      <table width="617" height="259">
       <tr>
        <td width="603" colspan="2" align="center" height="16"><font face="Verdana" size="2" color="#000080">deneme.kozlusan</font></td>
       </tr>
       <tr>
        <td width="180" height="25"><font face="Arial" size="2" color="#000066"><b>Adınız:</b></font></td>
        <td width="423" height="25"><input type="text" name="name" size="20"></td>
       </tr>
       <tr>
        <td width="180" height="25"><font face="Arial" size="2" color="#000066"><b>Konu:</b></font></td>
        <td width="423" height="25"><input type="text" name="konu" size="20"></td>
       </tr>
       <tr>
        <td width="180" height="25"><font face="Arial" size="2" color="#000066"><b>Telefon:</b></font></td>
        <td width="423" height="25"><input type="text" name="tel" size="20"></td>
       </tr>
       <tr>
        <td width="180" height="25"><font face="Arial" size="2" color="#000066"><b>Adres:</b></font></td>
        <td width="423" height="25"><input type="text" name="adres" size="20"></td>
       </tr>
       <tr>
        <td width="180" height="25"><font face="Arial" size="2" color="#000066"><b>E-Mail:</b></font></td>
        <td width="423" height="25"><input type="text" name="email" size="20"></td>
       </tr>
       <tr>
        <td width="180" height="119"><font face="Arial" size="2" color="#000066"><b>Mesajınız:</b></font></td>
        <td width="423" height="119"><textarea name="mesaj" cols="20" rows="5"></textarea></td>
       </tr>
       <tr>
        <td width="180" height="27"> </td>
        <td width="423" height="27"><input type="submit" name="Submit" style="font-size: 8pt; font-family: Verdana; font-weight: bold" value="Gönder"></td>
       </tr>
      </table>
     </td>
    </tr>
   </table>
  </td>
</tr>
</form>
</table>
</body>
</html>

mail.asp gönderme dosyası

<% @ Language="VBScript" %>
<% Option Explicit %>
<%
dim strAd
strAd  = request.form("name")

dim strKonu
strKonu  = request.form("konu")

dim strTel
strTel   = request.form("tel")

dim strAdres
strAdres = request.form("adres")

dim strEmail
strEmail = request.form("email")

dim strMesaj
strMesaj = request.form("mesaj")

dim strHtml
strHtml = strHtml & "<html>" & vbNewLine
strHtml = strHtml & "<head>" & vbNewLine
strHtml = strHtml & "<title>Html Mail</title>" & vbNewLine
strHtml = strHtml & "<meta http-equiv=""Content-Type"" content=""text/html; charset=iso-8859-9"">" & vbNewLine
strHtml = strHtml & "</head>" & vbNewLine
strHtml = strHtml & "<body leftmargin=""0"">" & vbNewLine
strHtml = strHtml & "<table align=""center"" border=""0"" cellspacing=""0"" cellpadding=""0"" width=""100%"">" & vbNewLine
strHtml = strHtml & " <tr> " & vbNewLine
strHtml = strHtml & "  <td> " & vbNewLine
strHtml = strHtml & "   <table align=""center"" border=""0"" cellspacing=""0"" cellpadding=""0"" width=""779"">" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Konu :</b> " & strKonu & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Adınız :</b> " & strAd & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>E-Mail :</b> " & strEmail & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Telefon :</b> " & strTel & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Adres :</b> " & strAdres & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Zaman :</b> " & Now() & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>IP Adres :</b> " & Request.ServerVariables("REMOTE_ADDR") & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "    <tr> " & vbNewLine
strHtml = strHtml & "     <td><b>Mesaj :</b> " & strMesaj & "</td>" & vbNewLine
strHtml = strHtml & "    </tr>" & vbNewLine
strHtml = strHtml & "   </table>" & vbNewLine
strHtml = strHtml & "  </td>" & vbNewLine
strHtml = strHtml & " </tr>" & vbNewLine
strHtml = strHtml & "</table>" & vbNewLine
strHtml = strHtml & "</body>" & vbNewLine
strHtml = strHtml & "</html>" & vbNewLine

dim blnHtmlMail
blnHtmlMail = True

dim objCDOMail
set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = request.form("name")
objCDOMail.To = "Gönderen isim" & " <mail@domain.com>"
objCDOMail.Subject = "İletişim Formu"
objCDOMail.Body = strHtml
if blnHtmlMail = True then
objCDOMail.BodyFormat = 0
else
objCDOMail.BodyFormat = 1
end if
objCDOMail.MailFormat = 0
objCDOMail.Importance = 1
objCDOMail.Send

set objCDOMail = Nothing

Response.Write "MESAJINIZ GÖNDERİLDİ İLGİNİZ İÇİN TEŞEKKÜRLER"
Response.Redirect "formmail.asp"
%>

Alıntı yap

20/Mar/08 16:30

Kısayol

Şikayet

Özel Mesaj

FOXXLY

Kayıt Tarihi: 19/Haziran/2006

abi replace yap en basiti :/

kelimeler albayım bazı anlamlara gelmiyor.

Alıntı yap

20/Mar/08 16:45

Kısayol

Şikayet

Özel Mesaj

streetw1se

Kayıt Tarihi: 22/Eylül/2007

onu nasıl yapıcaz?

Alıntı yap

20/Mar/08 17:33

Kısayol

Şikayet

Özel Mesaj

camarade
ontedi

Kayıt Tarihi: 04/Eylül/2005

objCDOMail.Body = strHtml

objCDOMail.SetLocaleIDs(1252)

böyle dene bakalım.

Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.

Alıntı yap

20/Mar/08 19:05

Kısayol

Şikayet

Özel Mesaj

Swool

Kayıt Tarihi: 11/Kasım/2007

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" > Kısmını;

<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /> olarak değiştir.

Alıntı yap

21/Mar/08 15:15

Kısayol

Şikayet

Özel Mesaj

streetw1se

Kayıt Tarihi: 22/Eylül/2007

düzelmedi arkadaslar ya napıcam kafayı yemek üzereyim :(

Alıntı yap

21/Mar/08 15:55

Kısayol

Şikayet

Özel Mesaj

FOXXLY

Kayıt Tarihi: 19/Haziran/2006

Replace kullanımı

kelimeler albayım bazı anlamlara gelmiyor.

Alıntı yap

21/Mar/08 16:08

Kısayol

Şikayet

Özel Mesaj

camarade
ontedi

Kayıt Tarihi: 04/Eylül/2005

Hocam zaten senin mail formunda html ile gönderim yapılabiliyor blnHtmlMail = True demişsin.

Şimdi senin yapacağın iş,

strHtml = strHtml & "<meta http-equiv=""Content-Type"" content=""text/html; charset=iso-8859-9"">" & vbNewLine kodunu

strHtml = strHtml & "<meta http-equiv=""Content-Type"" content=""text/html; charset=1254"">" & vbNewLine olarak değiştirmek.

Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.

Alıntı yap

21/Mar/08 23:54

Kısayol

Şikayet

Özel Mesaj

Swool

Kayıt Tarihi: 11/Kasım/2007

Formda Türkçe karakter sorunu yok :)

Hostunla alakalı bir durum olabilir.

Alıntı yap

22/Mar/08 00:25

Kısayol

Şikayet

Özel Mesaj

streetw1se

Kayıt Tarihi: 22/Eylül/2007

hocam sorunu çözdüm yardımlarınız için teşekkürler..

Alıntı yap

22/Mar/08 00:47

Kısayol

Şikayet

Özel Mesaj

camarade
ontedi

Kayıt Tarihi: 04/Eylül/2005

streetw1se bunu yazdı:
-----------------------------
hocam sorunu çözdüm yardımlarınız için teşekkürler..
-----------------------------

Sorunu nasıl çözdüğünü bari bildirseydin. Hocam bu arada sen beni Msn'ye ekledin mi?

Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.

Alıntı yap