%
function fixQuotes(theString)
fixQuotes = Replace(theString,"'"," ")
end function
Dim name,fathername,add1,add2,add3,telephone,email,qualification,experience,comments
name = ""
fathername = ""
add1 = ""
add2 = ""
add3 = ""
telephone = ""
email = ""
qualification = ""
experience = ""
comments = ""
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("email")="" then
email = trim(fixQuotes(request.form("email")))
else
email = ""
end if
if not request.form("qualification")="" then
qualification = trim(fixQuotes(request.form("qualification")))
else
qualification = ""
end if
if not request.form("experience")="" then
experience = trim(fixQuotes(request.form("experience")))
else
experience = ""
end if
if not request.form("comments")="" then
comments = trim(fixQuotes(request.form("comments")))
else
comments = ""
end if
' response.write name&"
"
' response.write fathername&"
"
' response.write add1&"
"
' response.write add2&"
"
' response.write add3&"
"
' response.write telephone&"
"
' response.write email&"
"
' response.write qualification&"
"
' response.write experience&"
"
' response.write comments&"
"
sqlinsert = "Insert into jobs (name,fathername,add1,add2,add3,telephone,"&_
"email,qualification,experience,comments)"&_
" values ('"&name&"','"&fathername&"','"&add1&"','"&add2&"','"&add3&"',"&telephone&","&_
"'"& email &"','"&qualification&"','"&experience&"','"&comments&"')"
'response.write sqlinsert
deafwaycon.execute sqlinsert
response.redirect "jobs-confirmation.htm"
end if
%>
- :: - Deaf Way - ::