%Response.Buffer=true
response.expires=0
myid=Session("myid")
myname=Session("myname")
if myid="" or myname="" then response.end
call get_guests
if myname<>guests(myid,0) or Session("mytemp")<>guests(myid,1) then response.end
call get_says
set rsparam=conn.execute("select * from param")
if guests(myid,4)<>rsparam("superlevel") then response.end
%>