用ASP封IP的方法，防止固定IP垃圾留言_ASP教程

教程Tag：暫無Tag,歡迎添加,賺取U幣!

推薦：查詢某個字段沒有值的所有記錄的SQL語句怎么寫？
有時我們需要查詢出某字段沒有值的全部記錄，那應(yīng)該用rs("xx")=""還是IsNull(rs("xx"))呢？要得出結(jié)論，我們還得從頭說起：什么情況下字段中會沒有值？因?yàn)檫@和

以下為引用的內(nèi)容：

<%
Dim IP,IPString,VisitIP
'要禁止的IP地址
IPString="|195.225.177.34|195.225.177.137|72.232.250.10|"
'獲取IP地址
IP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If IP = "" Then
IP = Request.ServerVariables("REMOTE_ADDR")
End If
VisitIP="|"&IP&"|"
If instr(1,IPString,VisitIP)>0 Then
response.write "你的IP被禁止發(fā)表留言，若有必要，請與站長聯(lián)系。如果你正在發(fā)送垃圾，奉勸你收手！"
response.end
End If
'response.Write("你的IP:"&IP&"可以訪問本站")
%>

注：記得將此代碼嵌入到最終執(zhí)行頁（不一定為留言發(fā)表頁面）的頭部，大部分垃圾都是直接POST數(shù)據(jù)到該執(zhí)行頁的。建議不定期修改最終執(zhí)行頁的文件名及與之鏈接的留言發(fā)表頁面的 form 標(biāo)簽內(nèi)的 action。

分享：ASP實(shí)例：Access為后臺數(shù)據(jù)庫的網(wǎng)站統(tǒng)計(jì)系統(tǒng)
一個能對訪問者進(jìn)行編號、記錄訪問次數(shù)、IP、時間的統(tǒng)計(jì)制作實(shí)例我以ACCESS庫為例子，其實(shí)用SQL SERVER庫也只要改一下鏈接庫的語句就得啦，庫結(jié)構(gòu)如下庫文件名： CONT.ASP 本來是CONT.