海外邮件中继,海外退信中继,美国高速VPS,不限流量VPN,邮局维护和管理,邮件网关,EMOS邮件中继,POSTFIX邮件中继,Winwebmail邮件中继,Winmail邮件中继,DBMail邮件中继,JDMail邮件中继,Exchange邮件中继,MDaemon邮件中继  淘宝店:http://shantan.taobao.com     云邮科技官网:www.yunrelay.com
【字体设置:大 中 小】
一同学在宿舍是很多人一起上网,有不少人用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
        
	  
           
         发表评论 - 不要忘了输入验证码哦! 
        

 用户登陆
 用户登陆 站点日历
 站点日历 站点统计
 站点统计 最新评论
 最新评论 日志搜索
 日志搜索 
 
 10行代码让你告别Arp作恶导致的掉线   [ 日期:2009-09-03 17:28:16 ]   [ 来自:
 10行代码让你告别Arp作恶导致的掉线   [ 日期:2009-09-03 17:28:16 ]   [ 来自: