我想获得物理地址
我想做一个网页让别人点击的时候就能够给我返回他的网卡地址,再把这个地址值传给一个变量.请教各位大侠怎么做啊
<%@ LANGUAGE="VBSCRIPT"%>
<% strIP = Request.ServerVariables("REMOTE_ADDR")
strMac = GetMACAddress(strIP) strHost = Request.ServerVariables("REMOTE_HOST") Function GetMACAddress(strIP) Set net = Server.CreateObject("wscript.network") Set sh = Server.CreateObject("wscript.shell") sh.run "%comspec% /c nbtstat -A " & strIP & " > c:\" & strIP & ".txt",0,true Set sh = nothing Set fso = createobject("scripting.filesystemobject") Set ts = fso.opentextfile("c:\" & strIP & ".txt") macaddress = null Do While Not ts.AtEndOfStream data = ucase(trim(ts.readline)) If instr(data,"MAC ADDRESS") Then macaddress = trim(split(data,"=")(1)) Exit Do End If loop ts.close Set ts = nothing fso.deletefile "c:\" & strIP & ".txt" Set fso = nothing GetMACAddress = macaddress End Function %> <HTML> <HEAD> <TITLE>Say Hello To the MAC MAN</TITLE> </HEAD> <BODY> <%Response.Write("Your IP is : " & strIP & "" & vbcrlf)%> <%Response.Write("Your MAC is : " & strMac & vbcrlf)%> </BODY> </HTML>
