error.asp

ASP+Access

<%
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
%>