<% ' Const MAIL_TO_ADDRESS = "kjames@indigomail.com" Const MAIL_TO_ADDRESS = "lmulhall@cell-crete.com" Const MAIL_SUBJECT = "Cell-Crete Contact Form" If Request.Form("pageaction") = "sendmail" Then Dim strBody Dim strFrom ' Build email body strBody = "Contact Info" & vbCrLf & vbCrLf strBody = strBody & Request.Form("Name") & vbCrLf strBody = strBody & Request.Form("Organization") & vbCrLf strBody = strBody & Request.Form("Address") & vbCrLf strBody = strBody & Request.Form("City") & ", " & Request.Form("State") & " " & Request.Form("Zip") & vbCrLf & vbCrLf strBody = strBody & "Phone: " & Request.Form("Phone") & vbCrLf strBody = strBody & "Email: " & Request.Form("Email") & vbCrLf & vbCrLf strBody = strBody & "Referral: " & Request.Form("Referral") & vbCrLf & vbCrLf strBody = strBody & "Questions / Comments:" & vbCrLf strBody = strBody & Request.Form("Comments") & vbCrLf ' Get from address If Request.Form("email") = "" Then strFrom = MAIL_TO_ADDRESS Else strFrom = Request.Form("email") End If ' Send mail SendMail strFrom, MAIL_TO_ADDRESS, MAIL_SUBJECT, strBody Response.Redirect("thankyou.asp") End If %> Contact Cell-Crete Corp.
Cell-Crete Home
About Us Projects Services Contact Us Cell-Crete Home
We would like to hear from you.

Contact Information

Contact Form

Have a question or comment about our products, services or this web site? Use the contact form on this page. We'll get back to you ASAP!

Contact Form

Please note: blue fields are required.

Name:
Organization:
Address:
City:
State: Zip:
Telephone: (please include area code)
E-Mail: (e.g., yourname@somewhere.com)

How did you learn about the Cell-Crete web site?

    Search Engine    Printed Literature
    Word of Mouth    Web Site (please enter site address below)

Please enter any comments or questions below:
Copyright © 1965-2010, Cell-Crete Corp. All rights reserved.