高考问答xd苹果软件6.0:ASP代码解读2
来源：百度文库 编辑：高考问答 时间：2024/05/08 09:06:24
下面是一段代码
<!--#include file="conn.asp"-->
<%
dim name
dim psw
name=replace(trim(request("name")),"'","")
psw=replace(trim(Request("psw")),"'","")
sql="select * from user where psw='"&psw&"' and name='"&name&"'"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
if psw=rs("psw") then
response.cookies("users")("name")=name
response.cookies("users")("userpass")=psw
Session("open")=True
Response.redirect "admin.asp"
end if
end if
%>
是一个登陆代码，每行是什么意思？
运行时出现下面文字：
错误类型：
Microsoft JET Database Engine (0x80040E14)
FROM 子句语法错误。
/web/test/login.asp, 第 8 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
网页：
GET /web/test/login.asp
是什么事？应怎样处理？
三个问的
<!--#include file="conn.asp"-->
<%
dim name
dim psw
name=replace(trim(request("name")),"'","")
psw=replace(trim(Request("psw")),"'","")
sql="select * from user where psw='"&psw&"' and name='"&name&"'"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
if psw=rs("psw") then
response.cookies("users")("name")=name
response.cookies("users")("userpass")=psw
Session("open")=True
Response.redirect "admin.asp"
end if
end if
%>
是一个登陆代码，每行是什么意思？
运行时出现下面文字：
错误类型：
Microsoft JET Database Engine (0x80040E14)
FROM 子句语法错误。
/web/test/login.asp, 第 8 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
网页：
GET /web/test/login.asp
是什么事？应怎样处理？
三个问的
<!--#include file="conn.asp"-->
包含文件conn.asp，conn.asp中定义了数据库连接conn和数据集rs
<%
dim name
dim psw
'定义变量
name=replace(trim(request("name")),"'","")
psw=replace(trim(Request("psw")),"'","")
'过滤单引号，防sql注入
sql="select * from user where psw='"&psw&"' and name='"&name&"'"
'sql语句
rs.open sql,conn,1,1
'执行sql语句，将执行结果存入数据集rs中
if not(rs.bof and rs.eof) then
'如果数据集不为空
if psw=rs("psw") then
'如果数据库中的密码和传入的密码一致（改if其实可以不用）
response.cookies("users")("name")=name
response.cookies("users")("userpass")=psw
'将用户名和密码存入cookies
Session("open")=True
'将session变量open设置为true
Response.redirect "admin.asp"
'登陆成功后页面跳转至admin.asp
end if
end if
%>
正解