<%
if Request.Querystring("isSubmitted") = "yes" then
Dim Name
Dim Email
Dim objCDO
Dim Comments
Name= Request.Querystring("Name")
Prayer=Request.Querystring("Prayer")
Email=Request.Querystring("Email")
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From =Email
objCDO.To = "prayers@stmaryofperpetualhelp.com"
objCDO.Cc = "stmaryph@aol.com"
objCDO.Bcc = "stmaryph@aol.com"
objCDO.Subject = "Prayer Request from www.stmaryofperpetualhelp.com"
objCDO.Body = "Name: " & Name & "" & vbcrlf & vbcrlf & vbcrlf& "Prayer: " & Prayer
objCDO.BodyFormat = 1
objCDO.MailFormat = 1
objCDO.Send
Response.Redirect"thanks.html"
End If
%>
St. Mary of Perpetual Help
Prayer Request
"You are encouraged to send in your own personal prayer requests. Your intentions will be remembered during the praying of the Rosary and Novena prayers to Our Lady of Perpetual Help Church on Wednesday evenings."
