asp如何防范Ddos攻击啊？

asp如何防范Ddos攻击啊？比如耗尽资源攻击，我查了一下啊 asp代码 可以防御，请问代码如何写啊 请教

<%
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 "系统维护中."
%>
这是防止cc攻击的，防止不良用户恶意刷新有多个数据库连接的页面。
至于你说的ddos只能通过硬件防火墙来解决
大部分的ddos攻击（分布式拒绝服务攻击）主要是通过伪造ip地址向你的服务器发送大量请求而导致半连接数过多从而阻塞网络