|
<%
if Request.Form.Count>0 then
on error resume next
set mail = CreateObject("CDONTS.NewMail")
mail.name = Request.Form("name")
mail.from = Request.Form("from")
mail.to = Request.Form("to")
mail.subject = Request.Form("subject")
mail.body = Request.Form("body")
mail.send
if err.number=0 then
%> Your Request has been transmitted successfully. <%
else
%>Your Request has been transmitted successfully. <%
end if
end if
%>
|