登陆管理帮我解释一下！！！搞定加分！！

<%
dim name,password '定义2个变量
name=request.form("name") '接收表单用户名
password=request.form("password") '-密码
dim exec,conn,rs
exec="select *from check where(name='"&name&"' and password='"&password&"')" '-sql语句查询是否有这个用户
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("admin.mdb") '-数据库连接
set rs=server.createobject("adodb.recordset") '创建记录集
rs.open exec,conn '打开数据库连接
if not rs.eof then '-如果存在此用户
rs.Close '关闭
conn.Close
session("checked")="yes" '设置参数为正确的
session("check")="right"
response.Redirect "index.asp" '定位到首页
else
session("checked")="no" '没有的话错误参数
session("check")="wrong"
response.Redirect "login.asp"
end if
%>

退出。exit.asp
<%@language=vbscript%>
<%
session("check")="" '清空参数
session("checked")=""
response.redirect "login.asp"
%>