求一段ASP登陆数据库验证的代码。要SQL语句
<%'设置数据库连接dimconn,rs,sqlcmd'连接,记录集,字符串setconn=Server.CreateObject("adodb.connection")...
<%
'设置数据库连接
dim conn,rs,sqlcmd '连接,记录集,字符串
set conn= Server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.jet.oledb.4.0;data source=" & server.MapPath("_ringDB.mdb")
dim username,password,yanzheng
username=Request.QueryString("username")
password=Request.QueryString("password")
sqlcmd="SELECT byUser.[_userName], byUser.[_passWord] FROM byUser WHERE (((byUser.[_userName])='"& uesrname &"') AND ((byUser.[_passWord])='" & password &"'));"
set rs=conn.Execute(sqlcmd)
rs.close
%>1
请补充下 我写道这里不会写了~谢谢 展开
'设置数据库连接
dim conn,rs,sqlcmd '连接,记录集,字符串
set conn= Server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.jet.oledb.4.0;data source=" & server.MapPath("_ringDB.mdb")
dim username,password,yanzheng
username=Request.QueryString("username")
password=Request.QueryString("password")
sqlcmd="SELECT byUser.[_userName], byUser.[_passWord] FROM byUser WHERE (((byUser.[_userName])='"& uesrname &"') AND ((byUser.[_passWord])='" & password &"'));"
set rs=conn.Execute(sqlcmd)
rs.close
%>1
请补充下 我写道这里不会写了~谢谢 展开
展开全部
昏,你写的呀???够笨的方法了.
set conn= Server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.jet.oledb.4.0;data source=" & server.MapPath("_ringDB.mdb")
这条语句写到conn.asp中,然后在任何网页中插入
<!--#include file=conn.asp-->就可以了,以后也不用写了.
接收网页传递,你要明白,一般输入用户名和密码是一个界面,检查用户名密码是另一个界面.你必须接收传递过来的用户名和密码,也就是上一个网页的form组件.当点"提交"后,传递到这个检查页面中.
在这个界面接收username 和 password .
("")中的username是上一个网页中textbox中的值,也就是用户输入的值,密码也一样.在检查页面中,接收传来的值.代码如下:
username=request.querystring("username")
password=request.querystring("password")
你用recordset对像建立rs
你SQL语句有问题.不用那么麻烦,我写的就可以:
set rs=server.createobject("adodb.recordset")
sql="select * from byuser where _username='"&username&"' and _password='"&password&"'"
rs.open sql,conn,1,3
判断代码:
if rs.eof then
response.write"输入的用户和密码错误!"
response.end
else
session("admin")=rs("_username")
response.Redirect("showbook.asp?username="&username&"&pageno="&pageno&"")
----------------------------------------
我解释一下判断,当rs指针到数据库底,证明没有找到username和password相同的数据,所以,该用户没有注册,或者用户名或密码错误导致,提示"输入的用户和密码错误!"
否则,证明rs指针没有到底,已经找到相同的值.建立session,为了让用户有特殊操作,比如说,是否允许修改或删除,
只要判断session的值是否为空就可以了
session("admin")=rs("_username")
session("admin")的值就是rs("_username")的值,比如它的值是"小王"
判断是否有权限,当在其他的网页当中:
if session("admin")=rs("_username")
........
else
respose.write("你没有登陆,无权操作!")
endif
------------------------------------
只有通过你对session("admin")=rs("_username")的赋值
上面的验证才能通过.
明白了么?
累死我了,你太栗色,1分也不给,别人懂的都不原因回答你的问题.
你要知道我费了大半天的功夫.
set conn= Server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.jet.oledb.4.0;data source=" & server.MapPath("_ringDB.mdb")
这条语句写到conn.asp中,然后在任何网页中插入
<!--#include file=conn.asp-->就可以了,以后也不用写了.
接收网页传递,你要明白,一般输入用户名和密码是一个界面,检查用户名密码是另一个界面.你必须接收传递过来的用户名和密码,也就是上一个网页的form组件.当点"提交"后,传递到这个检查页面中.
在这个界面接收username 和 password .
("")中的username是上一个网页中textbox中的值,也就是用户输入的值,密码也一样.在检查页面中,接收传来的值.代码如下:
username=request.querystring("username")
password=request.querystring("password")
你用recordset对像建立rs
你SQL语句有问题.不用那么麻烦,我写的就可以:
set rs=server.createobject("adodb.recordset")
sql="select * from byuser where _username='"&username&"' and _password='"&password&"'"
rs.open sql,conn,1,3
判断代码:
if rs.eof then
response.write"输入的用户和密码错误!"
response.end
else
session("admin")=rs("_username")
response.Redirect("showbook.asp?username="&username&"&pageno="&pageno&"")
----------------------------------------
我解释一下判断,当rs指针到数据库底,证明没有找到username和password相同的数据,所以,该用户没有注册,或者用户名或密码错误导致,提示"输入的用户和密码错误!"
否则,证明rs指针没有到底,已经找到相同的值.建立session,为了让用户有特殊操作,比如说,是否允许修改或删除,
只要判断session的值是否为空就可以了
session("admin")=rs("_username")
session("admin")的值就是rs("_username")的值,比如它的值是"小王"
判断是否有权限,当在其他的网页当中:
if session("admin")=rs("_username")
........
else
respose.write("你没有登陆,无权操作!")
endif
------------------------------------
只有通过你对session("admin")=rs("_username")的赋值
上面的验证才能通过.
明白了么?
累死我了,你太栗色,1分也不给,别人懂的都不原因回答你的问题.
你要知道我费了大半天的功夫.
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询