%
dim ckd1
dim ckd2
dim ckd3
dim ckd4
dim cmd
dim plan
dim Needs
dim Interests
dim name
dim city
dim cntcnm
dim state
dim preferred
dim email
dim phone
dim address
dim zip
dim fax
dim loco
dim people
dim errz
dim erra
dim err
dim errk
dim erre
dim errd
dim errp
dim erro
dim errt
dim errh
dim errf
dim errv
dim errs
dim str
dim company
dim lenght
dim rquest
dim ckd5
dim ckd6
dim ckd7
dim callmail
dim mailonly
Preferred=request.form("Preferred")
rquest=request.form("rquest")
company=request.form("company")
lenght=request.form("lenght")
cmd=request.form("cmd")
email=request.form("email")
name=request.form("name")
state=request.form("state")
loco=request.form("loco")
phone=request.form("phone")
address=request.form("address")
zip=request.form("zip")
dte=request.form("dte")
city=request.form("city")
if cmd="" then
ckd1="selected"
end if
if Preferred="none" then
ckd1="selected"
end if
if Preferred="evenings" then
ckd2="selected"
end if
if Preferred="weekends" then
ckd3="selected"
end if
if Preferred="office" then
ckd4="selected"
end if
if cmd="" then
ckd5="selected"
end if
if Preferred="callmail" then
ckd5="selected"
end if
if Preferred="mailonly" then
ckd6="selected"
end if
if Preferred="phone" then
ckd7="selected"
end if
%>
<%
if cmd="chk" Then
if name="" then
errm=errm+"**PLEASE FILL OUT YOUR NAME**
"
end if
if name="" then
err=err+"A"
end if
if dte="" then
errd=errd+"**PLEASE FILL OUT A DATE, IF YOU ARE INQUIRING ABOUT MULITPLE DATES, PLEASE PROVIDE YOUR FIRST CHOICE**
"
end if
if dte="" then
err=err+"A"
end if
if phone="" then
errp=errp+"**PLEASE FILL OUT YOUR PHONE NUMBER**
"
end if
if phone="" then
err=err+"A"
end if
if address="" then
erra=erra+"**PLEASE FILL OUT YOUR MAIL ADDRESS**
"
end if
if address="" then
err=err+"A"
end if
if zip="" then
errz=errz+"**PLEASE FILL OUT YOUR ZIP CODE**
"
end if
if zip="" then
err=err+"A"
end if
if city="" then
errt=errt+"**PLEASE FILL IN YOUR CITY**
"
end if
if city="" then
err=err+"A"
end if
if state="" then
errs=errs+"**PLEASE FILL IN YOUR STATE**
"
end if
if loco="" then
err=err+"A"
end if
if loco="" then
erro=erro+"**PLEASE LET US KNOW YOUR LOCATION**
"
end if
if state="" then
err=err+"A"
end if
if not isgoodemail(email) then
errh=errh+"**PLEASE FILL OUT A PROPER EMAIL**
"
end if
if not isgoodemail(email) then
err=err+"A"
end if
if err="" then
ourmail
end if
if err="" then
clientmail
end if
if err="" then
response.redirect("thankyou2.asp")
end if
end if
%>