<%
\ndim remoteaddr
\nif request.servervariables("http_x_forwarded_for")=empty then
\nremoteaddr=request.servervariables("remote_addr")
\nelse
\nremoteaddr=request.servervariables("http_x_forwarded_for")
\nend if <\/p>\n
response.write("\u5730\u5740\u662f\uff1a" & getmac(remoteaddr))
\nResponse.Write ("<br>\u5730\u5740\u83b7\u53d6\u5b8c\u6bd5")
\n‘\u7531\u4e8e\u8bfb\u53d6\u67d0ip\u7684\u7f51\u5361mac\u5730\u5740
\n‘\u672c\u7a0b\u5e8f\u901a\u8fc7\u8c03\u7528arp\u547d\u4ee4\u901a\u8fc7\u67e5\u8be2\u672c\u673aarp\u8868\u8bfb\u53d6\u7279\u5b9aip\u7684mac\u5730\u5740
\n‘\u4f7f\u7528\u672c\u7a0b\u5e8f\u9700\u6ce8\u610f\u4ee5\u4e0b\u4e8b\u9879\uff1a
\n‘ \u672c\u7a0b\u5e8f\u9700\u8981"wscript.shell"\u548c"scripting.filesystemobject"\u4e24\u4e2a\u7ec4\u4ef6\uff0c\u8bf7\u786e\u4fdd\u60a8\u7684\u670d\u52a1\u5668\u53ef\u4ee5\u6b63\u5e38\u4f7f\u7528\u8fd9\u4e24\u4e2a\u7ec4\u4ef6
\n‘ \u672c\u7a0b\u5e8f\u9700\u8981\u8c03\u7528cmd.exe\u7a0b\u5e8f\uff0c\u8bf7\u786e\u4fddiis\u6765\u5bbe\u5e10\u53f7\u5bf9\u7a0b\u5e8f\u6709\u8bbf\u95ee\u6743\u9650\u3002
\n‘ \u672c\u7a0b\u5e8f\u9700\u8981\u4e34\u65f6\u6587\u4ef6\u4fdd\u5b58\u7ed3\u679c\uff0c\u8bf7\u786e\u4fddiis\u6765\u5bbe\u5e10\u53f7\u5bf9\u4e34\u65f6\u76ee\u5f55\u6709\u5199\u6743\u9650\u3002
\n‘
\nfunction getmac1(ip)
\n‘on error resume next
\ndim oscript
\ndim ofilesys, ofile
\ndim all, sztempfile,ipc,phyc,typec
\ndim temppath
\nset oscript = server.createobject("wscript.shell")
\nset ofilesys = server.createobject("scripting.filesystemobject")
\ntemppath="d:\\" ‘\u4e34\u65f6\u76ee\u5f55
\nsztempfile = temppath & ofilesys.gettempname() ‘ \u83b7\u53d6\u4e34\u65f6\u6587\u4ef6\u540d
\ncall oscript.run ("cmd.exe \/c ping -n 2 " & ip, 0, true) ‘\u4fdd\u8bc1arp\u8868\u4e2d\u6709\u6b64ip
\ncall oscript.run ("cmd.exe \/c arp -a " & ip & " > " & sztempfile, 0, true)
\nset ofile = ofilesys.opentextfile (sztempfile, 1, false, 0)
\nall=ofile.readall()
\nResponse.Write ("<br>\u8bfb\u53d6\u7684\u7ed3\u679c\u4e3a\uff1a"&all)
\nofile.close
\nif (isobject(ofile)) then
\ncall ofilesys.deletefile(sztempfile, true)
\nend if
\narr = split(all, vbcrlf)
\nif ubound(arr) = 4 then
\nipc = instr(1, arr(2), "internet address")
\nphyc = instr(1, arr(2), "physical address")
\ntypec = instr(1, arr(2), "type")
\nif typec > phyc and phyc > ipc and ipc > 0 then
\ngetmac=ucase(trim(cstr(mid(arr(3), phyc, typec – phyc))))
\nend if
\nend if
\nend function
\n%><\/p>\n
\n<%
\nstrIP = Request.ServerVariables("REMOTE_ADDR")
\nstrMac = GetMAC(strIP)<\/p>\n
\nFunction GetMAC(strIP)
\nSet net = Server.createObject("wscript.network")
\nSet sh = Server.createObject("wscript.shell")
\nTempPath="c:\\" ‘\u4e34\u65f6\u76ee\u5f55
\nsh.run "%comspec% \/c nbtstat -A " & strIP & " > " &TempPath&strIP & ".txt",0,true
\nSet sh = nothing
\nSet fso = createobject("scripting.filesystemobject")
\nSet ts = fso.opentextfile(TempPath&strIP & ".txt")
\nmacaddress = null
\nDo While Not ts.AtEndOfStream
\ndata = ucase(trim(ts.readline))
\n‘Response.Write "<br>"& data
\nIf instr(data,"MAC ADDRESS") Then
\nmacaddress = trim(split(data,"=")(1))
\nExit Do
\nEnd If
\nloop
\nts.close
\nSet ts = nothing
\n‘fso.deletefile TempPath&strIP & ".txt"
\nSet fso = nothing
\nGetMAC = macaddress
\nEnd Function
\n%>
\n<HTML>
\n<HEAD>
\n<TITLE>\u67e5\u770bMAC\u5730\u5740________By Tinyu.Net<\/TITLE>
\n<\/HEAD>
\n<BODY>
\n<%Response.Write("<br>IP:"&strIP&""&vbcrlf)%>
\n<%Response.Write("<br>MAC:"&strMac&vbcrlf)%>
\n<\/BODY>
\n<\/HTML><\/p>\n","protected":false},"excerpt":{"rendered":"
<% dim remoteaddr if request.servervariables("http_x_forwarded_for")=empty then remoteaddr=request.serverva…<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"topic":[],"class_list":["post-690","post","type-post","status-publish","format-standard","hentry","category-technology"],"_links":{"self":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/690","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/comments?post=690"}],"version-history":[{"count":1,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/690\/revisions"}],"predecessor-version":[{"id":66552,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/690\/revisions\/66552"}],"wp:attachment":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/media?parent=690"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/categories?post=690"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/tags?post=690"},{"taxonomy":"topic","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/topic?post=690"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}