#12002/11/29 10:09:51
请教高手!如何增强密码验证后重定向页面的安全性??
这是一个数据库密码验证登录程序login.asp,
代码如下:
<%
Option Explicit
Dim UserName,PassWord
UserName = trim(request.form("username"))
PassWord = trim(request.form("password"))
dim conn,db,TmpRs
db = "data/members.asp"
set conn = server.createobject("adodb.connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(db)
set TmpRs = server.createobject("adodb.recordset")
if Request.ServerVariables("REQUEST_METHOD")="POST" then
TmpRs.open "Select * from users Where Name='" & UserName & "'",conn,1,1
if tmprs.bof then
%>
<%
response.end '服务器停止响应,也就是下面的语句将不会被处理
elseif PassWord<>tmprs("PsW") then
%>
<%
else
session("UserName") = Username
tmprs.close
set TmpRs = nothing
conn.close
set conn = nothing
response.redirect("guestbook.htm")
End if
End if
%>
在login.asp中,如果密码验证通过,将通过重定向转入页面guestbook.htm
{代码是:response.redirect("guestbook.htm")}
其中guestbook.htm的程序如下:
正在进入系统,请稍后......
guestbook.htm只起了转到页面default.asp的作用!
可这样很不安全!访问者访问一次后,知道路径可以直接访问guestbook.htm或default.asp,
我应该怎样来实现禁止访问者直接访问guestbook.htm和default.asp呢??
请教高手!