如何获取来访者的MAC码?
在ASP中,如何获取来访者的MAC码,请告知,谢谢 问题点数:20、回复次数:7Top
1 楼gaopq_11(小小)回复于 2003-02-04 09:59:26 得分 10
<%@ 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>
Top
2 楼fatcat_xp(肉肉猫)回复于 2003-02-04 10:06:08 得分 2
UP。Top
3 楼snowcloud2002(忧郁の蓝)回复于 2003-02-04 11:58:35 得分 2
经典Top
4 楼earthpea(问莲根,有丝多少?莲心知为谁苦?)回复于 2003-02-04 12:08:56 得分 2
可能对方的计算机不会给你这么低的安全性吧Top
5 楼gang75(*^&^*)回复于 2003-02-04 12:23:55 得分 2
sjTop
6 楼yanfeng(烟峰)回复于 2003-02-04 21:15:19 得分 0
好好看看Top
7 楼julyclyde(Java初学(大学不教只好自己学))回复于 2003-02-05 21:28:00 得分 2
这是不可能实现的
上面的方法只能在同一网段实现。一旦通过路由器就不行了Top




