禁止网站外部提交数据
实现禁止网站外部提交数据用ASP代码编写
<%
'功能:提交的数据是否来自同一个网站
'Powered By:auuo.com
Function CheckUrl()
Dim server_flag1,server_flag2
server_flag1=Cstr(Request.ServerVariables("HTTP_REFERER")) '得到访问的上一页的网址
server_flag2=Cstr(Request.ServerVariables("SERVER_NAME")) '获取的网站主机头名称
If Mid(server_flag1,8,Len(server_flag2))<>server_flag2 Then '判断两个网站地址是否一样
Response.Write "禁止网站外部提交数据!"
Response.End
End If
End Function
%>
调用方法:
<%
ChecUrl()
%>