error.asp

使用源码注意项： 1、Windows2000 Professional SP3、DELPHI 6.0、SQL Server2000的开发环境； 2、开发目录为：D:PieceRate

<%
dim err,id
id=request("id")
select case id
case "1"
err="::你不是管理员::"
case "2"
err="::你不能进入该页。请登陆::"
case "3"
err="::用户名或密码出错！::"
end select
Response.Write "<title>ERROR!!!</title><p><br><center><font color=red>"&err
Response.Write "<p><a href=login.htm>返回登陆</a>"
'GoBack()
%>