<% @LANGUAGE = VBScript %>
<%
Option Explicit
Dim VarEmail, VarLastName
Dim Mail
Set VarEmail = Request.Form("Email")
Set VarLastName = Request.Form("LastName")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.raymerry.com" ' Specify a valid SMTP server
Mail.From = "service@raymerry.com" ' Specify sender's address
Mail.FromName = "Service" ' Specify sender's name
' This file is called as the confirmation page from the contact us form at raymerry.com
Mail.AddAddress "admin@raymerry.com", "Administration"
'Mail.AddAddress "editor@writersforhire.com" ' Name is optional
Mail.AddReplyTo "service@raymerry.com"
Mail.Subject = "Contact us form on raymerry.com Submitted!"
Mail.Body = "This message is sent by ASP, someone has filled out your contact us form at raymerry.com"
Mail.Body = Mail.Body & "Users Email is "
Mail.Body = Mail.Body & VarEmail & ", "
Mail.Body = Mail.Body & "Users Last Name is " & VarLastName
' This page sends an Email after someone completes the form that calls it.
' It does not really confirm any fields...
On Error Resume Next
Mail.Send
%>
Email Confirmation Form
Thank You for Contacting us. Your Data has been sent.