%@LANGUAGE="VBSCRIPT"%> <% dim sname, email, message, subject sname = Request.Form("sname") email = Request.Form("email") subject= "Domain Contact Form" smessage = Request.Form("message") Dim ObjMail Set ObjMail = Server.CreateObject("CDO.Message") objMail.From = sname & " <" & email & ">" objMail.To = "youremail@yourdomain.com" objMail.Subject = "Contact from Your Website" objMail.TextBody = smessage objMail.Send %>
Thank You <%=sname %>
If your message:
"<%=smessage %>"
Requires a response will be sent to <%=email%>