function Checkin(s)
s=trim(s)
s=replace(s," "," ")
s=replace(s,"'","'")
s=replace(s,"""",""")
s=replace(s,"<","<")
s=replace(s,">",">")
Checkin=s
end function
function CheckAdmin1
if Session("IsAdmin")true then response.redirect "error.asp"
end function
function CheckAdmin2
if Session("IsAdmin")true or (session("KEY")"check" and session("KEY")"super") then response.redirect "error.asp"
end function
function CheckAdmin3
if Session("IsAdmin")true or session("KEY")"super" then response.redirect "error.asp"
end function
sub error()
%>
---
Error! ! :(
...::: 点 此 返 回
:::...
end sub
%>