asp的网站 怎么样用代码防止CC攻击呢

网上找来的代码 没有效果 请高手赐教。

VB code:

if session("refresh")〈〉 1 then Session("refresh")=session("refresh")+1 Response.redirect "index.asp" End if

Dim fsoObject
Dim tsObject
dim file
if Request.ServerVariables("HTTP_X_FORWARDED_FOR")="" then
response.write "无代理访问"
response.end
end if
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
file = server.mappath("CCLog.txt")
if not fsoObject.fileexists(file) then
fsoObject.createtextfile file,true,false
end if
set tsObject = fsoObject.OpenTextFile(file,8)
tsObject.Writeline Request.ServerVariables("HTTP_X_FORWARDED_FOR")&"["&Request.ServerVariables("REMOTE_ADDR")&"]"&now()
Set fsoObject = Nothing
Set tsObject = Nothing
response.write "有代理访问"




以上代码是网络上的 但是实用效果没看到什么

---

有没有高手帮忙呀 看来是个难题

---

继续网上顶啊 都不在回调高手区那里了

---

好难好难啊 呵呵 再顶下