הוסטס - פורום אחסון האתרים הגדול בישראל - View Single Post - טופס יצירת קשר

~~CubeS.co.il~~ · 22-08-08, 14:24

בשגיאה - ברגע שלוחצים על שלח הוא עושה כאילו הדף לא נמצא...

זה הקוד של הטופס שממלאים בו פרטים

קוד:

<td><form action="mail_Contact_.asp" method="post" onSubmit="return Valid(this)">
          <table width="23&#37;" cellpadding="0" cellspacing="0" dir="ltr" lang="he">
            <tr>
              <td width="3%">&nbsp;</td>
              <td width="21%">&nbsp;</td>
              <td width="76%">&nbsp;</td>
            </tr>
            <tr>
              <td>&nbsp;</td>
              <td><table width="23%" border="0" bgcolor="#FFFF99" dir="rtl" lang="he" class="visittext1">
                  <tr>
                    <td width="5%">שם</td>
                    <td width="95%"><input name="name" type="text" id="name" tabindex="1" value="" size="21" require validName="יש לציין שם"></td>
                    
                  </tr>
                  
                  <tr>
                    <td>נייד</td>
                    <td><input name="mobile" type="text" tabindex="4" size="7" maxlength="7">
                      -
                      <select name="code_mobile" tabindex="3">
                  <option>בחרי</option>
                  <option value="050">050</option>
                  <option value="052">052</option>
                  <option value="054">054</option>
                  <option value="057">057</option>
              </select></td>
                   
                  <tr>
                  </tr>
                  <tr>
                    <td colspan="3"><div align="center">
                        <input type="submit" name="Submit" value="שלחי">

זה הקוד של mail_Contact_.asp

קוד:

<%@ language="VBSCRIPT" CODEPAGE="1255" %>
<%
		
	name = Request.Form("name")
	cell = Request.Form("mobile")
	cell2 = Request.Form("code_mobile")
	
	
' build HTML for message body

strHTML = "<HTML dir=rtl>"
strHTML = strHTML & "<HEAD>"
strHTML = strHTML & "<BODY>"
strHTML = strHTML & "&ugrave;&iacute;: " & name & "<br>"
strHTML = strHTML & "&egrave;&igrave;&ocirc;&aring;&iuml; &eth;&eacute;&eacute;&atilde;: "& cell2 & "-" & cell &"<br>"
strHTML = strHTML & "</BODY>"
strHTML = strHTML & "</HTML>"

	Session.CodePage = 1255 
	' change to address of your own SMTP server
	strHost = "mail.nannys.co.il"

		Set Mail = Server.CreateObject("Persits.MailSender")
		' enter valid SMTP host
		Mail.Host = strHost
		Mail.Charset = "Windows-1255"
		Mail.From = Request("& cell2 & "-" & cell &") ' From address
		Mail.FromName = Mail.EncodeHeader(Request("name"), "Windows-1255")
		Mail.AddAddress "jobs@cubes.co.il"
				
  		' message subject
  		Mail.Subject = "Mail from Nannys"
		
		' message body
		Mail.Body = strHTML
		Mail.IsHTML = True

		strErr = ""
		bSuccess = False
		On Error Resume Next ' catch errors
		Mail.Send	' send message

	Response.Redirect "http://www.nannys.co.il/&thorn;&thorn;Thanks_Contact.asp"
%>

איפה טעיתי?