pc软件 文章资讯 手机软件

您当前的位置→图文中心ARP文章ARP经验arp -s静态绑定脚本
阅读排行

arp -s静态绑定脚本


2008/12/14  编辑:佚名 来源:本站整理

Set objShell = CreateObject("WScript.Shell")

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.CreateTextFile("temp.bat")

Set objReg = New RegExp

strMacPattern = "((\d|([a-f]|[A-F])){2}-){5}(\d|([a-f]|[A-F])){2}"

strIPPattern = "((2[0-4]\d|25[0-5]|1?\d?\d)\.){3}(2[0-4]\d|25[0-5]|1?\d?\d)"

Set objExec = objShell.Exec("arp -a")

Do

        strTemp = objExec.StdOut.ReadLine

        objReg.Pattern = strMacPattern

        Set arrMac = objReg.Execute(strTemp)

        objReg.Pattern = strIPPattern

        Set arrIP = objReg.Execute(strTemp)

        For Each strMac In arrMac

                For Each strIP In arrIP

                        objFile.WriteLine "arp -s " & strIP & " " & strMac

                Next

        Next

Loop Until objExec.StdOut.AtEndOfStream

objFile.Close

strScriptPath = Replace(WScript.ScriptFullName,WScript.ScriptName,"")

Set objExec = objShell.Exec(strScriptPath & "temp.bat")

Do While objExec.Status = 0

        WScript.Sleep 1000

Loop

objFSO.DeleteFile strScriptPath & "temp.bat"

WScript.Echo "Done!"

相关文章

搜索神器 P2Psearcher是什么软件:最近BT、VeryCD相继不给力,于是,搜索神器——P2Psearcher横空出世。

ARP攻击防御解决方案:下面我们介绍几种常见ARP攻击典型的症状:上网的时候经常会弹出一些广告,有弹出窗口形式的,也有嵌入网页形式的。

ARP原理再次讲解:前几天有人问我,讲一下ARP原理。

发表评论
网站帮助 - 广告合作 - 下载声明 - 网站地图