%@ LANGUAGE=VBScript codepage ="936" %> <%Response.Expires=0 Response.ExpiresAbsolute = Now() - 1 Response.AddHeader "Pragma","No-Cache" Response.AddHeader "Cache-Control","Private" Response.CacheControl = "No-Cache" session("sjjh_jm")=session("sjjh_jm")+1 if session("sjjh_jm")>30 then Response.Redirect "../chat/readonly/bomb.htm" randomize timer regjm=int(rnd*8998)+1000 %>