Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

asp mailform script not working

Status
Not open for further replies.

estesflyer

Programmer
Dec 19, 2000
284
US
for some odd reason, this script isnt working anymore. anymore you ask? well, my friend wrote it. then he put it up on his site, and it worked just fine, then he gave it to me. (we both use the same server for our hosting) and it didnt work, also, it stopped working for him.

if you wanna see mah page w/ the script running, go to

anywho, here is the script...


Code:
<%
Dim sReqName
Dim sReqEMail
Dim sReqComments

sReqName = Trim(Request.Form(name&quot;))
sReqEMail = Trim(Request.Form(&quot;email&quot;))
sReqSubject = Trim(Request.Form(&quot;subject&quot;))
sReqComments = Trim(Request.Form(&quot;comments&quot;))

' Email the feedback
Set Mail = Server.CreateObject(&quot;SoftArtisans.SMTPMail&quot;) 

Mail.RemoteHost = &quot;mail.cfm-resources.net&quot;
Mail.AddRecipient &quot;Rusty&quot;, &quot;rustyestes@softhome.net&quot;
Mail.FromAddress = sReqEMail
Mail.FromName = sReqName
Mail.WordWrap      = True
Mail.WordWrapLen = 72
Mail.Subject = sReqSubject
Mail.BodyText = &quot;E-mail sent&quot; &amp; VbCrLf &amp; VbCrLf &amp; _
            &quot;Name: &quot; &amp; sReqName &amp; VbCrLf &amp; VbCrLf &amp; _
            &quot;EMail Address: &quot; &amp; sReqEMail &amp; VbCrLf &amp; VbCrLf &amp; _
            &quot;Comments: &quot; &amp; VbCrLf &amp; _
            sReqComments

On Error Resume Next
Mail.Send
If Err = 0 Then	
	%>
	<br>
	Thank you. Your message have been sent.<br>

	</font>
	<%
Else	
%>
	<br>
	<b>Error</b><br>
	<br>
	An error has occured while sending your comments. Please try again. If this error persists, please contact me at <A HREF=&quot;mailto:rustyestes@softhome.net&quot;>rustyestes@softhome.net</A><br>
	<%
End If
			
Set Mail = Nothing
%>
what happens, is nothing. go there, and you will c. i already matched up the names and everything for the script and the html form names...
TIA

- Rusty
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top