<%
uname=""
pwd=""
cpwd=""
fname=""
lname=""
age=""
gender=""
maritialstatus=""
email=""
add1=""
add2=""
city=""
state=""
country=""
phone=""
msg=""
if not request.form("submit.x")="" then
if not request.form("uname")="" then
uname = request.form("uname")
else
uname = ""
end if
if not request.form("pwd")="" then
pwd = request.form("pwd")
else
pwd = ""
end if
if not request.form("cpwd")="" then
cpwd = request.form("cpwd")
else
cpwd = ""
end if
if not request.form("fname")="" then
fname = request.form("fname")
else
fname = ""
end if
if not request.form("lname")="" then
lname = request.form("lname")
else
lname = ""
end if
if not request.form("age")="" then
age = request.form("age")
else
age = ""
end if
if not request.form("gender")="" then
gender = request.form("gender")
else
gender = ""
end if
if not request.form("maritialstatus")="" then
maritialstatus = request.form("maritialstatus")
else
maritialstatus = ""
end if
if not request.form("email")="" then
email = request.form("email")
else
email = ""
end if
if not request.form("add1")="" then
add1 = request.form("add1")
else
add1 = ""
end if
if not request.form("add2")="" then
add2 = request.form("add2")
else
add2 = ""
end if
if not request.form("city")="" then
city = request.form("city")
else
city = ""
end if
if not request.form("state")="" then
state = request.form("state")
else
state = ""
end if
if not request.form("country")="" then
country = request.form("country")
else
country = ""
end if
if not request.form("phone")="" then
phone = request.form("phone")
else
phone = ""
end if
sqlselect = "Select * from login_info where member_name = '" & uname & "'"
Set rs = Server.CreateObject ("ADODB.Recordset")
rs.Open sqlselect,deafwaycon,1,3
if not rs.EOF then
msg = "User name already exist."
else
if not pwd=cpwd Then
msg = "Password doesn't match."
else
rs.Close()
sqlinsert = "Insert into login_info (member_name,pass_word,fname,lname,age,gender,"&_
"maritialstatus,e_mail,add1,add2,city,st,con,tele)"&_
" values ('"&uname&"','"&pwd&"','"&fname&"','"&lname&"',"&age&",'"&gender&"',"&_
"'"&maritialstatus&"','"&email&"','"&add1&"','"&add2&"','"&city&"','"&state&"',"&_
"'"&country&"',"&phone&")"
'response.write sqlinsert
deafwaycon.execute sqlinsert
response.redirect "Regis-confirmation.htm"
end if
end if
end if
%>
- :: - Deaf Way - ::
