使用ASP程序获取客户端MAC地址,这是一个特殊的方法,用的地方比较少,经常在一些木马文件中看到这个。下面学步园小编来讲解下怎样使用ASP程序获取客户端MAC地址?
怎样使用ASP程序获取客户端MAC地址
具体的方法:viewsourceprint?01<%02dimremoteaddr 03ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")=emptythen 04remoteaddr=Request.ServerVariables("REMOTE_ADDR") 05else 06remoteaddr=Request.ServerVariables("HTTP_X_FORWARDED_FOR") 07endif 08 09Response.Write("MAC地址是:"&GetMac(remoteaddr)) 10'由于读取某IP的网卡MAC地址 11'本程序通过调用arp命令通过查询本机arp表读取特定IP的MAC地址 12'使用本程序需注意以下事项: 13'本程序需要“WSCRIPT.SHELL”和“Scripting.FileSystemObject”两个组件,请确保您的服务器可以正常使用这两个组件 14'本程序需要调用cmd.exe程序,请确保IIS来宾帐号对程序有访问权限。 15'本程序需要临时文件保存结果,请确保IIS来宾帐号对临时目录有写权限。 16' 17functionGetMac(IP) 18OnErrorResumeNext 19DimoScript 20DimoFileSys,oFile 21DimAll,szTempFile,ipc,phyc,typec 22DimTempPath 23SetoScript=Server.CreateObject("WSCRIPT.SHELL") 24SetoFileSys=Server.CreateObject("Scripting.FileSystemObject") 怎样使用ASP程序获取客户端MAC地址 25TempPath="d:\temp\"'临时目录 26szTempFile=TempPath&oFileSys.GetTempName()'获取临时文件名 27CalloScript.Run("cmd.exe/cping-n2"&IP,0,True)'保证arp表中有此IP 28CalloScript.Run("cmd.exe/carp-a"&IP&">"&szTempFile,0,True)
29SetoFile=oFileSys.OpenTextFile(szTempFile,1,False,0)
30All=oFile.ReadAll()
31oFile.Close
32If(IsObject(oFile))Then
33CalloFileSys.DeleteFile(szTempFile,True)
34EndIf
35arr=Split(All,vbCrLf)
36IfUBound(arr)=4Then
37ipc=InStr(1,arr(2),"InternetAddress")
38phyc=InStr(1,arr(2),"PhysicalAddress")
39typec=InStr(1,arr(2),"Type")
40Iftypec>phycAndphyc>ipcAndipc>0Then
41GetMac=Ucase(Trim(CStr(Mid(arr(3),phyc,typec-phyc))))
42EndIf
43EndIf
44Endfunction
45%>
以上就是关于“怎样使用ASP程序获取客户端MAC地址”的内容,希望对大家有用。更多资讯请关注学步园。学步园,您学习IT技术的优质平台!