<% a=request.form("x_type") if a="a" then dim x_name dim x_email dim x_phone dim x_besttime dim x_address dim x_state dim x_zip dim x_message dim x_type dim x_service x_name=request("x_name") x_email=request("x_email") x_phone=request("x_phone") x_besttime=request("x_besttime") x_address=request("x_address") x_state=request("x_state") x_zip=request("x_zip") x_message=request("x_message") x_service=request("service") x_type="contact" if x_service="" or x_service=null then x_service="none" end if Dim MyCDONTSMail2 Dim HTML Set MyCDONTSMail2 = CreateObject("CDO.Message") Set cdoConfig = Server.CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(cdoSendUsingMethod) = cdoSendUsingPort .Item(cdoSMTPServer) = "smtp.1and1.com" .Update End With Set MyCDONTSMail2.Configuration = cdoConfig HTML = "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "WebPartners - Contact Us Request" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "

" HTML = HTML & "Current date & time: " & now() & "
" HTML = HTML & "Incoming Proposal Request

" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "" HTML = HTML & "
Name" & x_name & "
Email" & x_email & "
Phone" & x_phone & "
Best Time To Call" & x_besttime & "
Street Address" & x_address & "
State" & x_state & "
Zip" & x_zip & "
Message or Proposal" & x_message & "
Service customer is interested in" & x_service & "
From Page on Webiste" & x_type & "
" HTML = HTML & "" HTML = HTML & "" MyCDONTSMail2.From= "mnae@webpartners.net" MyCDONTSMail2.To="mnae@webpartners.net" MyCDONTSMail2.Subject="WebPartners Contact Us Request" MyCDONTSMail2.HTMLBody=HTML MyCDONTSMail2.Send set MyCDONTSMail2=nothing response.Redirect("confirm.asp") response.end end if %>
 
 
 

Like what you see, fill out the form below and contact one of our consultants today. It’s free to you and priceless for your company’s network. Thanks for visiting our site. Have a great day!

Name:

Email:

">

Phone:

Best Time To Call:

Address:

State/Zip:

 

Comments:

 
SOLUTIONS WE OFFER

<%services="desktop"%>