UC知道ASP留言本如何实现管理登陆?
来源：百度知道 编辑：UC知道 时间：2024/06/18 18:14:56
我做了一个ASP+Access留言簿程序,但不知怎么去实现管理登陆,进入管理员才能操作的页面(如删除留言的页面),这个管理的数据库只有二个字段:admin和password ,基本知道是由两个页面组成的,一个是填写管理名和密码的login表单页面,一个是后台验证页面,前者好像是首先在页面源码前面有一个判断语句,后面接表单内容.
哪位大侠能告诉帮我写出这二三者的代码,可以大大的加分,数据库连接和查询代码最好是以下形式的:
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("myadmin.mdb")
%>
<%
exec="select * from guestbook"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
而最好不要是哪种sql="select*from......"
而用exec="select*from......"
请写出具体的用session来进行权限判断的语句和后台验证的代码,不具体就相当于白说了
哪位大侠能告诉帮我写出这二三者的代码,可以大大的加分,数据库连接和查询代码最好是以下形式的:
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("myadmin.mdb")
%>
<%
exec="select * from guestbook"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
而最好不要是哪种sql="select*from......"
而用exec="select*from......"
请写出具体的用session来进行权限判断的语句和后台验证的代码,不具体就相当于白说了
1.htm '放登录表单
2.asp
UserName=Trim(Request.From("UserName"),"'","") '用户名
UserPass=trim(Reqeust.From("UserPass"),"'","") ' 密码
if UserName<>"" or UserPass<>"" Then
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("myadmin.mdb")
set rs=server.createobject("adodb.recordset")
rs.open "Select * From YouTableName where UserName='"&UserName&"' and UserPass='"&UserPass&"'",conn,1,1
If rs.eof and rs.bof Then
Response.Write "用户名和密码错误"
Response.End()
End If
End IF
--------------------
conn.exec="select*from......"一般用于执行一条记录.进行判断并返回记录的没做过...
关注ing.....
给你个思路:
可以用session来进行权限判断,方法:
在用户登录成功时