%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
' Smart Mailer 1.0.5
' Send on submit of form form1
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
Server.ScriptTimeout = 300
Set sm1 = new SmartMailer
sm1.checkVersion "1.05"
sm1.contentCharset = "us-ascii"
Session.CodePage = sm1.getCodepage()
sm1.smtpSetup "127.0.0.1", "", "", ""
sm1.pickup = ""
sm1.component = "cdo"
sm1.tmpFolder = ""
sm1.embedImages = false
sm1.progressBar = ""
sm1.ignore_errors = false
sm1.useQueue = false
sm1.setFrom (Request.Form("name")), "enrollment@rensselaerarc.org"
sm1.setTo "Enrollment", "enrollment@rensselaerarc.org"
sm1.setCc "", ""
sm1.setBcc "", ""
sm1.Subject = (Request.Form("name")) & " - " & Request.Form("phone")
' using static for body
sm1.setBody_Static_html "" & vbCRLF & "Name: " & (Request.Form("name")) & "" & vbCRLF & "Date of Birth: " & (Request.Form("date_of_birth")) & "" & vbCRLF & "County of Residence: " & (Request.Form("county")) & "" & vbCRLF & "Phone Number: " & (Request.Form("phone")) & "" & vbCRLF & "
" & "Services:
" & (Request.Form("servicesPlanning")) & "
" & (Request.Form("servicesResidentialServices")) & "" & vbCRLF & "" & (Request.Form("servicesDayHab")) & "
" & (Request.Form("servicesCommunityInclusion")) & "" & vbCRLF & "" & (Request.Form("servicesSupportedEmployment")) & "
" & (Request.Form("servicesServiceCoordination")) & "" & vbCRLF & "" & (Request.Form("servicesRespite")) & "
" & (Request.Form("servicesFamilySupportServices")) & "" & vbCRLF & "" & (Request.Form("servicesTransitionServices")) ^ "
" & "
Form Completed by:
" & (Request.Form("completedParent")) & "" & vbCRLF & "" & (Request.Form("completedMedicaid")) & "" & vbCRLF & "" & (Request.Form("completedSocialWorker")) & "" & vbCRLF & "" & (Request.Form("completedOther")) & "" & vbCRLF & "" & "
Additional Comments: " & (Request.Form("additional_comments")) & ""
' Attachments none
sm1.sendMail "one"
Response.Redirect "thankyou.html" & ""
end if
SM_mailAction = getMailAction()
%>