一同学在宿舍是很多人一起上网， 有不少人用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 "arp -d",0 End If Wscript.sleep(Times) Loop
