当前位置：中国站长下载 → 文章中心 → 网页编程 → ASP编程 → 10行代码让你告别Arp作恶导致的掉线

10行代码让你告别Arp作恶导致的掉线

减小字体 增大字体 作者：李光明  来源：如梦令  发布时间：2008-9-1 17:37:27

一同学在宿舍是很多人一起上网，有不少人用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 

[] [返回上一页] [打 印]

文章评论评论内容只代表网友观点，与本站立场无关！

频道栏目导航

本类热门阅览

相关文章