ASPEmail | ASPEmail Email Component Script by ASP Web Pro
  ASPEmail | ASPEmail Email Component Script

ASP Scripts

ASPEmail

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 text box and a textarea box.

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">
<table>
<tr><td>Email: </td>
<td><input type="text" name="Email" size="50"></td></tr>
<tr><td>First Name: </td>
<td><input type="text" name="FirstName" size="50"></td></tr>
<tr><td>Last Name: </td>
<td><input type="text" name="LastName" size="50"></td></tr>
<tr><td>Subject: </td>
<td><input type="text" name="Subject" size="50"></td></tr>
<tr><td>Comments: </td>
<td><textarea name="Comments"></textarea></td>
</table>
<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.aspwebpro.com"
Mail.From = strEmail
Mail.AddAddress "general@aspwebpro.com"
Mail.AddCC "general@aspwebpro.com"
Mail.Subject = "ASP Web Pro: Online Form"
strMsgHeader = "This email was delivered from the ASP Web Pro website." & vbCrLf & 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 "There has been an error and your message could not be sent through email. Please contact us directly at 1-716-768-6221. " & Err.Description
END IF
%>

<P>
<%
Response.Write strFirstName & ",<br>"
Response.Write "Your message has been successfully sent."
%>,</P>

Now you have a complete form that sends data to an email address and displays a customized message for your user. 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!

< Back to ASP Scripts


 

 

Main Menu
Home
ASP Scripts
ASP Tutorials
JavaScripts
Awards
Contact Us

Email This Page

Other Resources
ASP Web Hosting
Search Engine Submission
Programming Help

 

 

 

Other ASP Web Sites

Site Map

 

Last Updated:
09 May 2008