帖子主题: ARP攻击怎么屏蔽[求助]

感觉有人戳我后背,老是我上不了网人家能上,气死我了,求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助求助~~~~~~~~~~~~~~~~~~~~~~~~~~

今天刚有个黑防会员发了篇原创文章。呵呵。其实方法很多，用防火墙……
----------------
[原创]防范ARP攻击的VBS脚本代码 by 洪建强

虽然网上的防范ARP攻击脚本代码满天飞，但是或多或少都有一些不足，为此，我用VBS重新写了一个全自动的双向绑定MAC地址的代码，使用很简单，只需把以下代码用记事本保存为vbs脚本文件，然后双击运行即可！代码如下：

'容错语句
On Error Resume Next
'创建Scripting.FileSystemObject对象
Set fs=CreateObject("Scripting.FileSystemObject")
'获得系统路径
Set dir1=fs.GetSpecialFolder(0)
'实现自我复制到用户的启动目录，文件名为ARPover.vbs,实现开机自我运行，至于为什么不通过修改注册表来实现自我启动，那是因为如果这样写脚本，会引起类似卡巴这样强悍的杀毒软件误报！
dir1 = left(dir1,2) + "\Documents and Settings\All Users\「开始」菜单\程序\启动\ARPover.vbs"
fs.GetFile(WScript.ScriptFullName).copy(dir1)


'-----------------------------------------------以下是捆绑网关MAC地址的模块
'创建WScript.Shell对象
Set objShell = CreateObject("WScript.Shell")
'执行ipconfig命令
Set objWshScriptExec = objShell.Exec("ipconfig")
'获得执行命令的结果
Set objStdOut = objWshScriptExec.StdOut
'获取网关IP地址
While Not objStdOut.AtEndOfStream
  strLine = objStdOut.Readline
  if InStr(strLine,"Default Gateway") Then
     gw_str = strLine
  End if
Wend
temp = split(gw_str,":")
GatewayIP = left(temp(1),Len(temp(1))-1)
'执行查找网关MAC地址的命令    
MACmd = "arp -a" + GatewayIP
Set objWshScriptExec = objShell.Exec(MACmd)
'从执行结果中提取网关MAC地址
Set objStdOut = objWshScriptExec.StdOut
While Not objStdOut.AtEndOfStream
  strLine = objStdOut.Readline
  if InStr(strLine,GatewayIP) Then
     gw_str = strLine
  End if
Wend
temp = split(gw_str,"-")
GatewayMAC = right(temp(0),2) & "-" & temp(1) & "-" & temp(2) & "-" & temp(3) & "-" & temp(4) & "-" & left(temp(5),2)                      '获取网关MAC地址
'合并命令
BindCmd = "arp -s" + GatewayIP + " " + GatewayMAC
'输出捆绑的命令，用于调试。
'MsgBox BindCmd
'执行绑定网关MAC地址的命令
objShell.Exec(BindCmd)
'输出网关IP地址，用于调试。                      
'MsgBox "GatewayIP:" + GatewayIP
'输出网关MAC地址，用于调试。            
'MsgBox "GatewayMAC:" + GatewayMAC          


'-----------------------------------------------以下是捆绑本机MAC地址模块
Set objShell = CreateObject("WScript.Shell")
Set objWshScriptExec = objShell.Exec("ipconfig /all")
'获得命令的执行结果
Set objStdOut = objWshScriptExec.StdOut
'从命令执行结果中提取与本机IP地址和本机MAC地址的信息
While Not objStdOut.AtEndOfStream
  strLine = objStdOut.Readline
  if InStr(strLine,"IP Address") Then
     gw_ip = strLine
  End if
  if InStr(strLine,"Physical Address") Then
     gw_mac = strLine
  End if
Wend
temp = split(gw_ip,":")
'得到本机IP地址
LocalIP = left(temp(1),Len(temp(1))-1)    
temp = split(gw_mac,":")
'获取本机MAC地址
LocalMAC = left(temp(1),Len(temp(1))-1)  
'合并命令
BindCmd = "arp -s" + LocalIP + " " + LocalMAC
'输出捆绑的命令，用于调试。

'MsgBox BindCmd
'输出本机IP地址，用于调试。              
'MsgBox "LocalIP:" & LocalIP
'输出本机MAC地址，用于调试。      
'MsgBox "LocalMAC:" & LocalMAC      
'执行捆绑本机MAC地址的命令                    
objShell.Exec(BindCmd)

好了，我们来看看程序运行的效果吧！为执行该脚本之前：

执行该脚本之后：
  
其中192.168.0.1是我的路由IP，192.168.0.5是我的本机IP，执行“arp -a”可以看到“Type”值由“dynamic”变为“static”了，在看看“C:\Documents and Settings\All Users\「开始」菜单\程序\启动”多了一个名为“ARPover.vbs”的脚本，这说明程序已经达到我们的目的了。

使用commview软件也可以看到哪台机器有问题。

服务器和网关地址双绑定就OK了，如果你在路由绑定有困难，那就单绑定，单绑定速度慢，攻击发包速度快就会击穿，这时，你就写个批处理，每秒帮顶一次，万无一失。基本不影响服务器效率。

我怎么什么都下不到??

你下载一个金山的ARP防火墙

360的arp也很好的