繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 10行代码让你告别Arp作恶导致的掉线
- ASP
- 用EasyMailObject组件处理Exchange邮件源代码(6)
- 用EasyMailObject组件处理Exchange邮件源代码(7)
- 利用ASP和Access数据库制作局域网网上答题系统
- 用ASP开发试题库与在线考试系统(1)
- 用ASP开发试题库与在线考试系统(2)
- 用ASP开发试题库与在线考试系统(3)
- 用ASP开发试题库与在线考试系统(4)
- 用ASP开发试题库与在线考试系统(5)
- 用ASP开发试题库与在线考试系统(6)
- 用ASP开发试题库与在线考试系统(7)
- 用ASP开发试题库与在线考试系统(8)
- 综合的判断用户输入的合法性的函数
- 三层动态下拉菜单的例子
- 将你的网站设置为客户的信任站点--VB方案
- 论坛中有新贴子功能的实现
- ASP 编程中 15 个非常有用的例子
- 一个的无组件上传的ASP代码
- 利用ASP实现三个强大功能之一
- 利用ASP实现三个强大功能之二
- 利用ASP实现三个强大功能之三
ASP 中的 10行代码让你告别Arp作恶导致的掉线
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-14 浏览: 93 ::
收藏到网摘: n/a
一同学在宿舍是很多人一起上网，有不少人用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 |
评论 (0) All
