＋设为首页 ＋添加到收藏夹
我的留言版加入验证码，也是无法屏蔽那些垃圾留言，我觉得还是没有屏蔽群发器的留言，您说呢，有高手说“屏蔽站外提交”，怎么才能做到站外屏蔽呢，用什么方法呀！请指点高招
Public Function ChkPost()
Dim server_v1,server_v2
Chkpost=False
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 Chkpost=True
End Function
if ChkPost=FALSE then
response.write "站外提交"
response.end
end if
外部提交的基本意思。是上一个连接过来的网址不是自己的站点。比如是从baidu过来的。等等，
还有你的验证码，都禁止不了的话是没有办法。你可以换一个验证码就可以了。复杂点的。外部提交是可以直接弄假的
关注ing
站外提交是不是和盗连一样
你可以用SESSION保存一个值，绝对可以防止站外提交
每次提交都验证一下Session
如果他每次站外提交时 先调用一下有session的页面 这个方法不保险
<%If Request.ServerVariables("HTTP_REFERER")="" Or InStr(Request.ServerVariables("HTTP_REFERER"),Request.ServerVariables("SERVER_NAME"))=0 Then%>
非法进入
<%end if%>
