One of the most common ways to send form data is with the AspEmail component. In this script, we will use AspEmail to send data from a basic contact form including text and textarea boxes.
The first thing you need to do is create a /FormPage.asp page with the code below:
<form name="YourFormName" method="Post" action="confirmation.asp">
Email: <input type="text" name="Email" size="50"><br>
First Name: <input type="text" name="FirstName" size="50"><br>
Last Name: <input type="text" name="LastName" size="50"><br>
Subject: <input type="text" name="Subject" size="50"><br>
Comments: <textarea name="Comments"></textarea><br>
<input type="submit" name="Submit" value="Submit Form">
</form>
Next, we create a /Confirmation.asp page with our AspEmail code as seen below:
<%
DIM strEmail, strFirstName, strLastName, strSubject, strComments, Mail
strEmail = request.form("Email")
strFirstName = request.form("FirstName")
strLastName = request.form("LastName")
strSubject = request.form("Subject")
strComments = request.form("Comments")
DIM Mail, strMsgHeader
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.YourDomain.com"
Mail.From = strEmail
Mail.AddAddress "YourEmail@YourDomain.com"
Mail.AddCC "AnotherEmail@YourDomain.com"
Mail.Subject = "Website Contact Form"
strMsgHeader = "This email was delivered from the YourDomain.com website." & vbCrLf
Mail.Body = strMsgHeader & "Email: " & strEmail & vbCrLf & _
"First Name: " & strFirstName & vbCrLf & _
"Last Name: " & strLastName & vbCrLf & _
"Subject: " & strSubject & vbCrLf & vbCrLf & _
"Comments: " & vbCrLf & strComments
On Error Resume Next
Mail.Send
Set Mail = Nothing
IF Err <> 0 THEN
Response.Write "An error has occurred: " & Err.Description
END IF
%>
<p><%
Response.Write strFirstName & ",<br>"
Response.Write "Your message has been sent and will be reviewed shortly."
%>,</p>
Now you have a complete form that sends data to an email address and displays a customized message for the message sender. The default format for ASPEmail is to send plain text messages. If you want to send HTML messages with ASPEmail, you can simply include this extra line of code before the Mail.Body line.
Mail.isHTML = True
Enjoy!