• 24-11-2012, 14:20:59
    #1
    aşağıda ki kodlarını verdiğim kodda isim adres ve telefon numaralarının zorunlu olmasını istiyorum ne yapmam gerek.

    <%
    	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
    
    %>
  • 26-11-2012, 03:36:52
    #2
    <%
    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...