[摘要]正在学习建设web站点的读者，可能正在为站点的安全性而担忧；也许你正在建设一个非公开性网站，只有系统用户才可以访问你的站点。如果你编制的是ASP网页，那么你可以通过本文轻松达到这一目的。首先，你需要制作登录页面，在html中加入form，并设为自发送页〈form name=″login″ acti...
正在学习建设web站点的读者，可能正在为站点的安全性而担忧；也许你正在建设一个非公开性网站，只有系统用户才可以访问你的站点。如果你编制的是ASP网页，那么你可以通过本文轻松达到这一目的。
首先，你需要制作登录页面，在html中加入form，并设为自发送页
〈form name=″login″ action=″default.ASP″ method=″post″ target=″—top″〉
action后接本页url，这样即使用户登录错误，在本页即获提示，而无须再返回前一页登录。在表单中加入
〈input name=″uid″ size=″10″maxlength=″10″ style=″height: 21px; width: 101px″〉
〈input name=″pwd″ type=″password″ size=″10″ maxlength=″10″〉
完成html后，在页首填加程序代码如下：
〈％ ′send customer direct to main page if already logged in
if not isempty(session(″cust—id″)) and len(session(″cust—id″))〉0 then response.redirect(″navigation/dashbrd.ASP″)
′在此添入你真正的主页url
end if
′set flags
blogin = false
berror = false
′check blank entries
if isempty(request(″uid″)) or len(request(″uid″)) = 0 or isempty(request(″pwd″)) or len(request(″pwd″)) = 0 then
′need to log in
blogin = true
else
′check user credentials against db
… ′检验你的数据库保存密码表中是否有该用户
′此处放入连接数据库代码
′其sql如下 ″select ＊ from customer where cust—id=′″ ＆ request(″uid″) ＆ ″′ and ′cust—pwd=′″ ＆ request(″pwd″) ＆ ″′″
′其中request(″uid″)和request(″pwd″) 为本页html中表单中的用户名和密码的text
gbfound = false
if not rscust.bof and not rscust.eof then
gbfound = true
end if
if gbfound then
′record useful customer info in session variables
session(″cust—id″) = rscust.fields(″cust—id″)
′ 此项为数据库中用户名
session(″cust—pwd″) = rscust.fields(″cust—pwd″) ′此项为数据库中用户密码
session(″power″) = rscust.fields(″power″) ′此项为数据库中用户权限[可选]
′update last login time [可选]
′ rscust.activeconnection.execute (″update customer set cust—login = ′″＆ now ＆ ″′ where cust_id = ″ ＆ session(″cust—id″) ＆ ″″)
response.redirect(″navigation/dashbrd.ASP″) ′真正主页url
else
′uid and password not found
berror = true blogin = true
end if
rscust.close
′close recordset
mycn—login.close
set mycn—login=nothing
′get all policy numbers held by customer
end if
％〉
最后，你要做的就是在你的每一个页面的开头，加入以下代码：
〈％ if isempty(session(″cust—id″)) or len(trim(session(″cust—id″)) = 0 then ％〉
〈script language=″javascript″ runat=client〉
〈!——
top.location.href = ″../default.ASP″
//——〉
〈script〉
〈％ response.end
end if ％〉
其中，session(″cust—id″) 为注册的用户名。
top.location.href = ″../default.ASP″ 将自动导航到你的登录界面。
在这样处理之后，恭喜你，你的web站点就有了安全登录的功能。即使别人知道了你的站点的地址，在不进行合法登录的情况下，也无法访问其他网页。并且，在你的网页超时后，需要用户重新登录，这样即便操作者临时离开，也不必担心非法者的恶意操作。
……