海外邮件中继,海外退信中继,美国高速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
发表评论 - 不要忘了输入验证码哦!