一同学在宿舍是很多人一起上网，有不少人用HTTP://www.cnpaf.net/class/arp' target='_blank'>ARP作恶，导致上网老是掉线。问我有什么办法吗，于是就写了下面的vbs脚本，同学说用了后聊天也不掉线了。
以下为引用的内容：On Error Resume Next Dim Times:Times=1000*60 Set WshShell = WScript.CreateObject("WScript.Shell") Do While True rt =WshShell.Run("ping 192.168.1.1",0,true) If (rt<>0) Then WshShell.Run "HTTP://www.cnpaf.net/class/arp' target='_blank'>ARP -d",0 End If Wscript.sleep(Times) Loop