Forms to Email Example

This is a basic example of an ASP script that will send the results of any form that uses the POST method to an email address.

NOTE: ASP controls the order in which form items are passed to the script. To keep the form items in a logical order would require extra processing and would limit the types of forms that could be used.

<%
  set mailer = server.createobject("SMTPsvg.Mailer")

  Mailer.FromName = "From Email Name"
  Mailer.FromAddress = "fromaddress@mysite"
  Mailer.RemoteHost = "mail.rapidsite.net"
  Mailer.AddRecipient "Your Name Here", "Your Email Address Here"
  Mailer.Subject = "Forms2Email"

  For each Item in Request.Form ' Loop through each Form item
     strMsgInfo = strMsgInfo & Item & ": " & Request.Form(Item) & vbCrLf
  next

  strMsgHeader = "Form information follows" & vbCrLf & "*************"
  strMsgFooter = vbCrLf & "*************"
  Mailer.BodyText = strMsgHeader & strMsgInfo & strMsgFooter

  if Mailer.SendMail then
     ' Message sent Ok, redirect to a confirmation page
     Response.Redirect ("http://mysite/confirm.htm")
  else
     ' Message send failure
     Response.Write ("An error has occurred.<BR>")
     ' Send error message
     Response.Write ("The error was " & Mailer.Response)
  end if
%>