asp de yazılmış iletişim formu lazım

**cenkp** · #1 (**permalink**) 2007-12-16, 15:00

Arkadaşlar aradım ama bulamadım, bana asp de yazılmış iletişim formu lazım.
Windows hostinde php ile yazılmış iletişim formları çalışmıyor da.
Yardımcı olursanız çok memnun olurum.

**forumselcuk** · #2 (**permalink**) 2007-12-16, 18:59

Windows hostingde php lerin çalışmamasının nedeni pleskde site ayarlarında setup kısmınmda php desteğinin olmamasıdır
aspindir.com da asp ilede bulabilirsin istediğin türlüsünü

**cenkp** · #3 (**permalink**) 2007-12-16, 19:04

Dediğin ayarları yapmayı denedim ama olmadı.
Teşekkür ederim adres için.

**TrDownload** · #4 (**permalink**) 2007-12-16, 19:14

pleskte domain e ait hosting alanını olustururken asp ve php seceneklerini işaretle calışır yapamaz isen pm at yardımcı olayım

**Permission** · #5 (**permalink**) 2007-12-16, 19:56

Sorunsuz ve ücretsiz asp mail form Server.CreateObject("JMail.Message" ) dili ile hazırlanmış bir script scriptteki secenekleri cogaltmak kolay sadece eklediğinzi input type="text" name="Ad_Soyad" kısımlarını eklediğiniz secenekle yapınız (tr karekter ve boşluksuz)

hadi kolay gelsin bakalım.

form.asp

Kod:

<table border="1" cellpadding="3" cellspacing="3" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" width="44%" id="AutoNumber1" height="80">
  <tr><form method="POST" action="gonder.asp">
    <td width="21%" style="border-style:none; border-width:medium; " height="17">
    <font size="2" face="Verdana">Adı Soyadı :</font></td>
    <td width="79%" style="border-style:none; border-width:medium; " height="17">
    <input type="text" name="Ad_Soyad" size="35"></td>
  </tr>
  <tr>
    <td width="21%" style="border-style: none; border-width: medium" height="17">
    <font size="2" face="Verdana">Mail :</font></td>
    <td width="79%" style="border-style: none; border-width: medium" height="17">
    <input type="text" name="Mail" size="35"></td>
  </tr>
  <tr>
    <td width="21%" style="border-style: none; border-width: medium" height="17">
    <font size="2" face="Verdana">Konu :</font></td>
    <td width="79%" style="border-style: none; border-width: medium" height="17">
    <select size="1" name="Konu">
    <option>---- Konu Seciniz ----</option>
    <option value="Bilgi Almak">Bilgi Almak</option>
    <option value="Şikayet">Şikayet</option>
    <option value="Reklam">Reklam</option>
    </select></td>
  </tr>
  <tr>
    <td width="21%" style="border-style: none; border-width: medium" height="17" valign="top">
    <font size="2" face="Verdana">Mesajın :</font></td>
    <td width="79%" style="border-style: none; border-width: medium" height="17">
    <textarea rows="6" name="Mesaj" cols="35"></textarea></td>
  </tr>
  <tr>
    <td width="21%" style="border-style: none; border-width: medium" height="17">
    </td>
    <td width="79%" style="border-style: none; border-width: medium" height="17">
      <input type="submit" value="Gönder" name="B1">
      <input type="reset" value="Sıfırla" name="B2"></p>
    </form>
    </td>
  </tr>
</table>

--------------------------------------------------------------------------

gonder.asp

Kod:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
CONST  infMailSunucu = "mail.site.com"
CONST  infMailKullaniciAdi = "mail@site.com"
CONST  infMailSifre = "sifre"
CONST  infMailYollayan = "mail@site.com"
CONST  alici_mail = "mail@site.com"
CONST  mailbasligi = "Bilgi Mesajı"
dim  mesaj 
mesaj = "<html><head><meta http-equiv=""Content-Type"" content=""text/html; charset=iso-8859-9""></head><body>"

Dim bilgiler
For Each bilgiler In Request.Form
	if bilgiler <> "Submit" then
		mesaj = mesaj & "<b>" & bilgiler & " : </b> "
		mesaj = mesaj & Request.Form(bilgiler) & "<br>"
	end if
Next

mesaj = mesaj & "</body></html>"



     SET  objMail = Server.CreateObject("JMail.Message" ) 
     With  objMail
        .ContentType = "text/html" 
        .CharSet = "ISO-8859-9" 
        .AddRecipient alici_mail
        .From = infMailYollayan
        .MailServerUserName = infMailKullaniciAdi
        .MailServerPassWord = infMailSifre
        .Logging =  True
        .Silent =  True
        .Subject = mailbasligi 
        .Body = mesaj
        .Send(infMailSunucu)
     End  With
     SET  objMail =  Nothing


response.write("Mesajınız Bize Ulaşmıştır. En Kısa zamanda cevap yazılacaktır..")

%>

gonder.asp de yapman geren degişiklikler

CONST infMailSunucu = "mail.site.com"
CONST infMailKullaniciAdi = "mail@site.com"
CONST infMailSifre = "sifre"
CONST infMailYollayan = "mail@site.com"
CONST alici_mail = "mail@site.com"
CONST mailbasligi = "Bilgi Mesajı"

**cagdaselk** · #6 (**permalink**) 2008-04-22, 14:06

Alıntı:

Permission´isimli üyeden Alıntı

Sorunsuz ve ücretsiz asp mail form

hadi kolay gelsin bakalım.

Çalışmıyor yardımcı olurmusunuz?

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
çalışan php iletişim formu lazım.	deviL	Script Satış-Sipariş	3	2007-12-08 22:13
Tüm dünyada kullanılan paypalın iletişim formu bozuk	Gifted.ib	Paypal E-Gold	7	2007-02-27 12:44