asp数据库中的数据若存在如何判断
用的软件是FrontPage，请仔细说明下。谢谢！我的注册页面html名为：index1.html，我的ASP文件为：oprate.asp，我的数据库名为：databas...
用的软件是FrontPage，请仔细说明下。谢谢！
我的注册页面html名为：index1.html，我的ASP文件为：oprate.asp，我的数据库名为：database.mdb，我的数据库中的表格为：data，表格中的关键字为：username.请问当我的在注册页面输入用户名时，怎么判段该用户名已经在数据库中存在了？ 代码要写在html中，还是asp中？请仔细一点，谢谢 下面是我的asp中的内容：
<%tmpzh="":tmpmm="":tmpsex="":tmpyx=""
tmpzh=request.form("username")
tmpmm=request.form("password")
tmpsex=request.form("txtsex")
tmpyx=request.form("mail")
%>
<html>
<head>
<title>oprate</title>
</head>
<body>
<% dim objConn,strconn
strconn="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("database.mdb")
set objConn=server.createobject("adodb.connection")
objConn.Open strconn
strSQL="insert into data(username,password,sex,mail) values('"&tmpzh&"','"&tmpmm&"','"&tmpsex&"','"&tmpyx&"')"
objConn.execute(strSQL)
response.write "<script language=JavaScript>" & "alert('注册成功！');</script>"
%>
</body>
</html> 展开
我的注册页面html名为：index1.html，我的ASP文件为：oprate.asp，我的数据库名为：database.mdb，我的数据库中的表格为：data，表格中的关键字为：username.请问当我的在注册页面输入用户名时，怎么判段该用户名已经在数据库中存在了？ 代码要写在html中，还是asp中？请仔细一点，谢谢 下面是我的asp中的内容：
<%tmpzh="":tmpmm="":tmpsex="":tmpyx=""
tmpzh=request.form("username")
tmpmm=request.form("password")
tmpsex=request.form("txtsex")
tmpyx=request.form("mail")
%>
<html>
<head>
<title>oprate</title>
</head>
<body>
<% dim objConn,strconn
strconn="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("database.mdb")
set objConn=server.createobject("adodb.connection")
objConn.Open strconn
strSQL="insert into data(username,password,sex,mail) values('"&tmpzh&"','"&tmpmm&"','"&tmpsex&"','"&tmpyx&"')"
objConn.execute(strSQL)
response.write "<script language=JavaScript>" & "alert('注册成功！');</script>"
%>
</body>
</html> 展开
5个回答
展开全部
哈哈，还是我自己回答吧！
我的asp中的代码具体如下：
<%tmpzh="":tmpmm="":tmpsex="":tmpyx=""
tmpzh=request.form("username")
tmpmm=request.form("password")
tmpsex=request.form("txtsex")
tmpyx=request.form("mail")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>oprate</title>
</head>
<body>
<% dim objConn,rs
set objConn=server.createobject("adodb.connection")
objConn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("database.mdb")
set rs=server.createobject("adodb.recordset")
selstr="select * from data where username='" & tmpzh & "'"
rs.open selstr,objConn
if not (rs.eof) then
response.write "<script language=JavaScript>" & "alert('该用户名已被占用，请重新选择用户名！');" & "history.back();" & "</script>"
rs.close
set rs=nothing
objConn.close
set objConn=nothing
else
strSQL="insert into data(username,password,sex,mail) values('"&tmpzh&"','"&tmpmm&"','"&tmpsex&"','"&tmpyx&"')"
objConn.execute(strSQL)
response.write "<script language=JavaScript>" & "alert('注册成功！');</script>"
end if
%>
<br><br><br><br><br><br><br><br>
<h1 align=center><font color=#FF0000>您已成功登录，将在3秒后跳转到你的主页……</font></h1>
<Meta http-equiv="Refresh" Content="3;URL=history.htm">
</body>
</html>
我的asp中的代码具体如下：
<%tmpzh="":tmpmm="":tmpsex="":tmpyx=""
tmpzh=request.form("username")
tmpmm=request.form("password")
tmpsex=request.form("txtsex")
tmpyx=request.form("mail")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>oprate</title>
</head>
<body>
<% dim objConn,rs
set objConn=server.createobject("adodb.connection")
objConn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("database.mdb")
set rs=server.createobject("adodb.recordset")
selstr="select * from data where username='" & tmpzh & "'"
rs.open selstr,objConn
if not (rs.eof) then
response.write "<script language=JavaScript>" & "alert('该用户名已被占用，请重新选择用户名！');" & "history.back();" & "</script>"
rs.close
set rs=nothing
objConn.close
set objConn=nothing
else
strSQL="insert into data(username,password,sex,mail) values('"&tmpzh&"','"&tmpmm&"','"&tmpsex&"','"&tmpyx&"')"
objConn.execute(strSQL)
response.write "<script language=JavaScript>" & "alert('注册成功！');</script>"
end if
%>
<br><br><br><br><br><br><br><br>
<h1 align=center><font color=#FF0000>您已成功登录，将在3秒后跳转到你的主页……</font></h1>
<Meta http-equiv="Refresh" Content="3;URL=history.htm">
</body>
</html>
参考资料： 自己努力！！
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
用记录集来调用数据库数据，如果记录集为空，这则你查询的数据部存在
这可以使用rs.eof 属性来判断，eof是判断记录是否到结尾。
sql="select * from table"
rs.open sql,conn,1,3
if rs.eof then
response.write("查询记录为空")
end if
这可以使用rs.eof 属性来判断，eof是判断记录是否到结尾。
sql="select * from table"
rs.open sql,conn,1,3
if rs.eof then
response.write("查询记录为空")
end if
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
asp的程序只能写在asp页面中噢。
连接数据库的驱动你已经有了。主要就是做数据查询。写个sql语句。然后通过判断就行了
tmpzh这个是接受用户名的变量是吧？
sql="select * from date where username='"&tmpzh&"'"
其实“神机妙算asd”写的已经很不错了。只需要再改下细节就好了
连接数据库的驱动你已经有了。主要就是做数据查询。写个sql语句。然后通过判断就行了
tmpzh这个是接受用户名的变量是吧？
sql="select * from date where username='"&tmpzh&"'"
其实“神机妙算asd”写的已经很不错了。只需要再改下细节就好了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
<%
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("/datebase.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="select * from date where username='"&username&"'"
rs.open sql,conn,1,3
if not rs.eof then
response.write "用户名已存在！请重新注册！"
else
rs.add
rs("username")=username
rs.update
end if
rs.close
set conn=nothing
%>
其中 username为request.form 获取过来的用户名！！
当然向数据库里面添加数据也可以使用 insert 语句
注意一下游标类型！！
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("/datebase.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="select * from date where username='"&username&"'"
rs.open sql,conn,1,3
if not rs.eof then
response.write "用户名已存在！请重新注册！"
else
rs.add
rs("username")=username
rs.update
end if
rs.close
set conn=nothing
%>
其中 username为request.form 获取过来的用户名！！
当然向数据库里面添加数据也可以使用 insert 语句
注意一下游标类型！！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
请问能再详细点吗？最好有你的源码 一点点就够了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（3）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
