%
function fixQuotes(theString)
fixQuotes = Replace(theString,"'"," ")
end function
Dim name,fathername,add1,add2,add3,telephone,caste,height,weight,description,placeofwork
Dim income,familybackground,comments,requirements
name = ""
fathername = ""
add1 = ""
add2 = ""
add3 = ""
telephone = ""
caste = ""
height = ""
weight = ""
description = ""
placeofwork = ""
income = ""
familybackground = ""
comments = ""
requirements = ""
if not request.form("submit.x")="" then
if not request.form("name")="" then
name = trim(fixQuotes(request.form("name")))
else
name = ""
end if
if not request.form("fathername")="" then
fathername = trim(fixQuotes(request.form("fathername")))
else
fathername = ""
end if
if not request.form("add1")="" then
add1 = trim(fixQuotes(request.form("add1")))
else
add1 = ""
end if
if not request.form("add2")="" then
add2 = trim(fixQuotes(request.form("add2")))
else
add2 = ""
end if
if not request.form("add3")="" then
add3 = trim(fixQuotes(request.form("add3")))
else
add3 = ""
end if
if not request.form("telephone")="" then
telephone = trim(fixQuotes(request.form("telephone")))
else
telephone = ""
end if
if not request.form("caste")="" then
caste = trim(fixQuotes(request.form("caste")))
else
caste = ""
end if
if not request.form("height")="" then
height = trim(fixQuotes(request.form("height")))
else
height = ""
end if
if not request.form("weight")="" then
weight = trim(fixQuotes(request.form("weight")))
else
weight = ""
end if
if not request.form("description")="" then
description = trim(fixQuotes(request.form("description")))
else
description = ""
end if
if not request.form("placeofwork")="" then
placeofwork = trim(fixQuotes(request.form("placeofwork")))
else
placeofwork = ""
end if
if not request.form("income")="" then
income = trim(fixQuotes(request.form("income")))
else
income = ""
end if
if not request.form("familybackground")="" then
familybackground = trim(fixQuotes(request.form("familybackground")))
else
familybackground = ""
end if
if not request.form("comments")="" then
comments = trim(fixQuotes(request.form("comments")))
else
comments = ""
end if
if not request.form("requirements")="" then
requirements = trim(fixQuotes(request.form("requirements")))
else
requirements = ""
end if
'response.write name&"
"
'response.write fathername&"
"
'response.write add1&"
"
'response.write add2&"
"
'response.write add3&"
"
'response.write telephone&"
"
'response.write caste&"
"
'response.write height&"
"
'response.write weight&"
"
'response.write description&"
"
'response.write placeofwork&"
"
'response.write income&"
"
'response.write familybackground&"
"
'response.write comments&"
"
'response.write requirements&"
"
sqlinsert = "Insert into matrimonial (name,fathername,add1,add2,add3,telephone,"&_
"caste,height,weight,description,placeofwork,income,familybackground,comments,requirement)"&_
" values ('"&name&"','"&fathername&"','"&add1&"','"&add2&"','"&add3&"',"&telephone&","&_
"'"&caste&"',"& height &","& weight &",'"&description&"','"&placeofwork&"',"&income&","&_
"'"&familybackground&"','"&comments&"','"&requirements&"')"
'response.write sqlinsert&"
"
deafwaycon.execute sqlinsert
response.redirect "matrimonial-confirmation.htm"
end if
%>
- :: - Deaf Way - ::