繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 10行代码让你告别Arp作恶导致的掉线
- ASP
- 深入研究“用ASP上载文件”(一)
- 深入研究“用ASP上载文件”(二)
- 一个投票系统的源程序(coveryourasp.com)
- 一 些 ASP 小 源 程 序
- 用ASP制作个性化的调查板（附源程序）
- 一些源程序 - 获得文件大小和字符串处理
- 用ASP创建日志文件（附源程序）
- 在一个ASP页面停留的多少时间的程序
- 用VB6做一个简单的文件上传组件(一)
- 用VB6做一个简单的文件上传组件(二)
- 构建你的网站新闻自动发布系统之七
- 实 现 滚 动 新 闻
- 网上“店铺”DIY(1)
- 网上“店铺”DIY(2)
- 网上“店铺”DIY(3)
- 负载平衡环境下的ASP会话管理(1)
- 负载平衡环境下的ASP会话管理(2)
- FrontPage创建HTML／ASP混合页面Ⅰ
- FrontPage创建HTML／ASP混合页面Ⅱ
- 在ASP应用中验证用户身份(1)
ASP 中的 10行代码让你告别Arp作恶导致的掉线
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-14 浏览: 77 ::
收藏到网摘: 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
