Jim Besaw

James Besaw

34145 Pacific Coast Hwy #522, Dana Point, Ca. 92629
JABesaw.com
JamesABesaw.com

For more information, fill out the form below.

* required
<% if not IsEmpty(Request.Form("btnTest")) then Response.Write("" & vbCrLf) end if %>
   * Name:   ">  ">
     Organization:   ">
     Phone Number:   ">
   * Email Address:   ">
     Comments:  
   *Verify Code:      Change Image
") if TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) then ' IF CODE MATCHES THEN 'Begin email Dim CDONTSMail Dim strBody Set CDONTSMail=CreateObject("CDO.Message") CDONTSMail.From = "form@jamesabesaw.com" CDONTSMail.To = "JABesaw@aol.com" CDONTSMail.Bcc = "susan@equilibriumdesign.com" CDONTSMail.Subject = "The Angels of Herron - Contact Request" strBody = "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "JamesABesaw.com - Contact Request" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "" strBody = strBody & "
" strBody = strBody & "Contact Information
" strBody = strBody & "Name: " & Request.Form("FirstName") & " " & Request.Form("LastName") strBody = strBody & "
" strBody = strBody & "Phone: " & Request.Form("Phone") strBody = strBody & "
" strBody = strBody & "Email: " & Request.Form("Email") strBody = strBody & "
" strBody = strBody & "Comments: " & Request.Form("Comments") strBody = strBody & "

" strBody = strBody & "Date/Time: " & Now() strBody = strBody & "

" strBody = strBody & "" strBody = strBody & "" CDONTSMail.HTMLBody = strBody CDONTSMail.Send set CDONTSMail = nothing 'end email 'Redirect Page Response.Redirect "thankyou.html" 'Response.Write("The code you enter verified.") else Response.Write("You entered the wrong code. Please try again.") end if Response.Write("