<% On Error Resume Next strEditMode = Request("txtEditMode") 'Blank or "LOGIN-to validate login" if(strEditMode = "CONTACT")then strFirstName = Request("txtFirstName") strLastName = Request("txtLastName") strEmail = Request("txtEmail") strCompany = Request("txtCompany") strTelephone = Request("txtTelephone") strComments = Request("txtComments") 'Email to info@genuitcorp.com strEmailBody = "<< Please do not respond to this email it has been auto-generated by PROMYS >> " & VbCrLf & VbCrLf strEmailBody = strEmailBody & "New brochure download requested by:" & VbCrLf & VbCrLf strEmailBody = strEmailBody & "Contact: " & strFirstName & " " & strLastName & VbCrLf strEmailBody = strEmailBody & "Company: " & strCompany & VbCrLf strEmailBody = strEmailBody & "Email: " & strEmail & VbCrLf strEmailBody = strEmailBody & "Telephone: " & strTelephone & VbCrLf strEmailBody = strEmailBody & "Comments: " & strComments & VbCrLf & VbCrLf strEmailBody = strEmailBody & "Sent at:" & Now() Set objCDOMessage = Server.CreateObject("CDO.Message") With objCDOMessage .To = "info@genuitinc.com" .From = "info@genuitinc.com" .Subject = "New brochure download requested by" & " " & strFirstName & " " & strLastName .TextBody = strEmailBody .Send End With Set objCDOMessage = Nothing strMessage = "Message sent successfully!" Response.Redirect("brochure_request_thanks.asp") end if %> Promys
Run Your Business with One System

PROMYS Customer SuccessDiscover PROMYS

Request the PROMYS Brochure

Get the PROMYS product brochure and discover how PROMYS gives you the web-based professional services automation you need with turnkey modules for all your critical business processes.

Simply fill out and submit the form below and you will instantly gain access to the PROMYS brochure.
<%=strMessage%>
First Name:*
Last Name:*
Email:*
Company:*
Telephone:*
Comments:

Enter the word you see in the box to the right:*

Please click 'Submit' only once and wait several seconds. You will redirected to the brochure download.