<%Response.Buffer=true response.expires=0 application.lock myname=Session("myname") myid=Session("myid") ISexit=false call get_guests if myname="" or myid="" then ISexit=true elseif myname<>guests(myid,0) or Session("mytemp")<>guests(myid,1) then ISexit=true end if if ISexit then response.write "" response.end end if zt=left(trim(server.HTMLEncode(request("zt"))),4) if zt="null" then zt="" guests(myid,13)=zt call put_guests application.unlock%>