求助:ASP登陆代码翻译

来源:百度知道 编辑:UC知道 时间:2024/05/24 09:50:03
帮忙注解一下每句的意思...及代码说明
Login.asp
<%
if request("action")="login" then
admin_name=request("admin_name")
admin_pass=request("admin_pass")
%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from admin where admin_name='"&admin_name&"' and admin_pass='"&admin_pass&"'"
rs.open sql,conn,3,3
if rs.eof then
response.write "<center>用户名和密码不匹配"
else
session("admin_name")=rs("admin_name")
response.redirect "manage.asp"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if

还有,
if request("action")="save" then
if instr(Request("Class_Nclass"),",")>0 then
Class_array=sp

Login.asp
<%
if request("action")="login" then '取状态是不是登陆
admin_name=request("admin_name") '取用户输入的用户名
admin_pass=request("admin_pass") '取用户输入的密码
%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from admin where admin_name='"&admin_name&"' and admin_pass='"&admin_pass&"'" '判断用户和密码是否在数据库里存在
rs.open sql,conn,3,3 '执行SQL
if rs.eof then '如果没有查出结果
response.write "<center>用户名和密码不匹配"
else
session("admin_name")=rs("admin_name") '把用户的登陆信息存在SESSION里
response.redirect "manage.asp" '跳转到manage.asp
end if
rs.close
set rs=nothing '关闭rs,释放rs
conn.close
set conn=nothing '关闭conn,释放conn
end if