|
<%
Dim bSuccess, strErr
If Request("Send") <> "" Then
On Error Resume Next
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "65.163.26.179"
If Request("From") = "" Then
Mail.From = "NoReply@uuakron.org"
Mail.FromName = "No Reply"
Else
Mail.From = Request("From")
Mail.FromName = Request("FromName")
Mail.AddReplyTo Request("From"), Request("FromName")
End If
Mail.AddAddress Request("To")
Mail.Subject = Request("Subject")
Mail.Body = Request("Body")
strErr = ""
bSuccess = False
Mail.Send
If Err <> 0 Then
strErr = Err.Description
Else
bSuccess = True
End If
End If
%>
<%
If strErr <> "" then
Response.Write(" Error Message: " & strErr & " ") ElseIf bSuccess = True Then %>
Thank you! Your email has been submitted. We appreciate your questions and/or comments. We will respond to your email as soon as possible. If you need immediate assistance, please feel free to call the church at (330) 836-2206. <% Else %>
Social Action Wants to Hear From You! Please feel free to contact us if you have any comments, questions, and/or suggestions. Be sure to include your e-mail address if you would like an email reply. If you would like us to call you, please leave your telephone number and a good time to reach you.
|
||||||||||||||||||||||||||
| & | Copyright
© 2005 Unitarian Universalist Church of Akron 3300 Morewood Avenue - Akron, OH 44333 - (330) 836-2206 Contact Administrator - Contact Webmaster sitemap |
% | |||||||||||||||||||||||||