<%@ 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"
cwjh_name=Session("cwjh_name")
if cwjh_name="" then Response.Redirect "../../../error.asp?id=440"
http = Request.ServerVariables("HTTP_REFERER") 
if InStr(http,"jhhy/workauto/mine")=0 then 
Response.Write "<script language=javascript>{alert('对不起，程序拒绝您的操作！！！\n     按确定返回！');parent.history.go(-1);}</script>" 
Response.End 
end if 
sj=DateDiff("s",session("cwjh_sj"),now())
if sj<11 then
	Response.Write "<script language=JavaScript>{alert('提示：请不要使用变速软件！');window.close();}</script>"
	Response.End
end if	
session("cwjh_sj")=now()
Session("cwjh_jl")=Session("cwjh_jl")+1
Response.Write "<script language=JavaScript>{parent.show.fm2.innerHTML="&int(Session("cwjh_jl")/3)&";parent.show.fm3.innerHTML="&Session("cwjh_jl") mod 3&";}</script>"
%>
