<!-- #include file="../mail/sendmail.asp"-->
<%
' Get the company information
Contact = Request.Form("ToName")
EMail = Request.Form("ToEMail")

' Send form mail
CR = Chr(13) & Chr(10)
From = Request.Form("Name_First") & " " & Request.Form("Name_Last")
FromEMail = Request.Form("EMail")
	
Subject = Contact & " - Contact Form"

Body = From & "," & CR & CR & _
		"Has sent the following message:" & CR & CR & _
		Request.Form("Email") & CR & CR

If Request.Form("Address") <> "" Then
	Body = Body & "Address:" & CR & _
			Request.Form("Address") & CR & CR
End If

Body = Body & Request.Form("Reply") & CR & CR

If Request.Form("Subscribe") = "Yes" then
	Body = Body & "Add me to your Newsletter EMail List" & CR & CR
End If

Body = Body & "From: " & Contact & " - Webmail Server"
	
MailMessage Contact, Subject, EMail, Body, From, FromEMail

Response.Redirect Request.Form("Redirect")
%>