Please subscribe
<%
dim section
dim strbody
section = trim(lcase(""&request("section")))
select case section
case "mailform"
'------------------------------------------------------------------
%><%
dim objEMail
set objEMail = server.createobject("CDONTS.NewMail")
objEmail.from = "" & request("email")
objEMail.to = "" & application("webFormEmail")
objEMail.subject = "Question sent from the SSIS Marketing International Website: "&request("name")
objEmail.importance = 1
objEmail.bodyformat = 0
objEmail.mailformat = 0
objEmail.body = strbody
objEmail.send
%>
Thank you for subscribing to our bi-monthly newsletter
with useful information, handy tips and help on CandeCAD
Pro.
This is an auroresponse to confirm that your subscription
request has been
received and logged into our system.
<%
'------------------------------------------------------------------
case else
%>
Insert your details in the form below and submit it for
us to be of assistance.
