param="driver={microsoft access driver (*.mdb)}" ‘指定数据库驱动程序，不可省略写为“access diver(*.mdb)”
conn.open param & ";dbq=" & server.mappath("psd.mdb") '用指定的数据库驱动程序打开数据库，并指定数据路径
sql="select*from psd where id='" & id & "' and psd='" & psd & "'" ‘定义sql从数据库中读取id及psd的值,本行中的第一个psd是指数据库名，以后的psd是指psd.mdb中的psd字段。
set rs=conn.execute(sql) '打开数据库
if rs.eof then
checkpwd=false
else
checkpwd=true
end if
end function ‘以上几句判断是否已经读完数据库中的记录，如果没有，就向后读，如果已经完成，则验证用户名及密码。如果验证通过，则为true,反之为flase
%>
<%
if isEmpty(session("passed")) then session("passed")=false '判断用户输入信息
id=request("id") ‘获取用户id(用户名)
psd=request("psd") ‘获取用户psd(密码)
if id="" or psd="" then
response.write"请输入您的登录名及密码。" '如果用户没有输入完整的信息，返回出错信息。
elseif not checkpwd(id,psd) then
response.write"用户名或密码错误！<br>请检查你的用户名及密码然后再试一次！" ‘如果用户已经输入完整信息，但输入错误也返回出错信息。
else session("passed")=true
end if
if not session("passed") then%> ‘用户输入的信息完全正确并验证通过，以下开始编写html代码，做一个用户登录界面。
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>请您输入您的用户名及密码！</title>
</head>
<body bgcolor="#000000" text="#FFFFFF">
<p align="center">
<p align="center"> </p>
<p align="center"><b><font face="黑体" size="6">用户登录首页</font></b></p>
<p align="center"> </p>
<form method="POST" action="<%=request.serverVariables("psd.mdb")%>">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="41%" align="right">用户名:</td>
<td width="59%"><input type="text" name="id" size="20" value="<%=id%>"></td>
</tr>
<tr>
<td width="41%" align="right"> 密 码：</td>
<td width="59%"><input type="password" name="psd" size="20" value="<%=psd%>"></td>
</tr>
<tr>
<td width="41%"> </td>
<td width="59%"> </td>
</tr>
</table>
<p align="center"><input type="submit" value="提交" name="B1"><input type="reset" value="清除" name="B1"></p>
</form>
<%response.end
end if %> ‘验证过程结束，进入加密网页。
</body>
</html>
完成了psd.asp的编写，可能你早已经迫不及待地想知道log.asp怎么编写了吧。让我们继续吧！
Log.asp的内容：
<!--#include file="psd.asp"--> ‘在log.asp源代码中的顶部输入这句,作用就是在系统执行log.asp之前先执行psd.asp啦！
