<%
tip = Request.Form("odeme")
icerik = "talep formu"
icerik = icerik & "<b> Ad Soyad: </b> " & request.form("adsoyad")& "<br>"
icerik = icerik & "<b> Adres : </b> " & request.form("adres") & "<br>"
icerik = icerik & "<b> Telefon : </b> " & request.form("telefon") & "<br>"
icerik = icerik & "<b> E-Posta : </b> " & request.form("email") & "<br>"
icerik = icerik & "<b> Tc & Vergi No: </b> " & request.form("tc") & "<br>"
icerik = icerik & "<b> Vergi Dairesi: </b> " & request.form("vergi") & "<br>"
icerik = icerik & "<b> Fatura Adresi: </b> " & request.form("faad") & "<br>"
icerik = icerik & "<b> Faks No: </b> " & request.form("fafax") & "<br>"
icerik = icerik & "<b> Adet : </b> " & request.form("adet") & "<br>"
icerik = icerik & "<b> Ürün Adı : </b> " & request.form("urun") & "<br>"
icerik = icerik & "<b> Ürün Kodu : </b> " & request.form("urun-kodu") & "<br>"
If tip = 0 Then
icerik = icerik & "<b> Ödeme Sekli : </b> Kapida Ödeme <br>"
Else
icerik = icerik & "<b> Ödeme Sekli : </b> Havale / Eft <br>"
End If
mserv = "mail.modernciftlik.com" ' Kendi Hostunuza Ait Mail Server Adresini Giriniz
posta = "info@modernciftlik.com" ' Kendi Hostunuzda Site Ait Olan Mail Adresiniz Giriniz.
Set obj = Server.CreateObject("Persits.MailSender")
obj.Host = mserv
obj.From = request.form("email")
obj.AddAddress posta
obj.Subject = "(c) Sipariş Formu MC"
obj.Body = icerik
obj.IsHTML = True
on error resume next
obj.Send
response.redirect("tesekkur.asp?odeme="&tip)
set obj = Nothing
%> Zorunlu alan uygulama
1
●890
- 24-11-2012, 14:20:59aşağıda ki kodlarını verdiğim kodda isim adres ve telefon numaralarının zorunlu olmasını istiyorum ne yapmam gerek.
- 26-11-2012, 03:36:52
<% If request.form("adsoyad")='' THEN Response.Redirect "mailformu.asp?adsoyad=false" ELSEIF request.form("adres")='' THEN Response.Redirect "mailformu.asp?adres=false" ELSEIF request.form("telefon")='' THEN Response.Redirect "mailformu.asp?telefon=false" ELSE ' ANYTHING TO DO END IF %>
mailformu.asp içinde input value'larına session değerlerini ata ki adam hepsini bir daha girmesin...
Orda da;
Request.Querystring("adsoyad")="false" Then Response.Write "Ad soyad boş geçilemez"
tarzında hata kontrolünü yapacaksın...