<% ' Save this file as sendmail.asp for operation with the mailform.htm example ' Change all instances of 'YourDomain.dom' to your own Domain Name 'Collect the data from the form msgName = Request("Name") msgEmail = Request("Email") 'Setup some variables for the email msgTo = "Admin " msgFrom = msgName & "<" & msgEmail & ">" msgSubject = "This is a form mail test" msgBody = "The quick brown fox jumped over the lazy dog!" 'Create the CDONTS Object Dim objMail set objMail = Server.CreateObject("CDONTS.NewMail") 'Set up the mail parameters objMail.To = msgTo objMail.From = "webform@YourDomain.dom" objMail.Value("Reply-To") = msgFrom objMail.Subject = msgSubject objMail.Body = msgBody 'Send the message and release the Object objMail.Send set objMail = nothing ' ---------------------- ' Documentation provided by E Business Services Ltd in association with Microsoft ' Contact: support@eBizs.net %>

Sendmail Confirmation Page

Thank you <%=msgName%>. Your message has been sent.