<%
'=========================================================
'　　　　　　　　　　　飞　扬　网　络
' Copyright (C) 2003-2005 feiyang.Com. All Rights Reserved.
' Web: http://www.feiyang.com
' QQ: 99686532        E-mail: bgh_edu@126.com
'=========================================================
%>
<%
Server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
Server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))

If Mid(Server_v1,8,Len(Server_v2))<>Server_v2 Then
  Response.write "<script>alert('请不要从外部站点提交数据！');location.href='qqcf_index.asp';</script>" 
  Response.end 
End If
%>