% Response.Expires = 60 Response.Expiresabsolute = Now() - 1 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "no-cache" CALL Session_onStart() Sub Session_onStart() if len(Session("Referer"))=0 then Referer = Trim(Request.ServerVariables("HTTP_REFERER")) If Referer = "" Then Referer = "None" End If Session("Referer") = Referer end if End Sub%>
|
|
||
|
|
|
|