asp获取客户端的MAC地址
时间:2007-08-17 10:58:00
本程序属于一种特别的方法。使用范围比较有限,而且有一定的危险性。借鉴了asp后门里的一些方法。
由于读取某IP的网卡MAC地址
本程序通过调用arp命令通过查询本机arp表读取特定IP的MAC地址
使用本程序需注意以下事项:
本程序需要“WSCRIPT.SHELL”和“Scripting.FileSystemObject”两个组件,请确保您的服务器可以正常使用这两个组件
本程序需要调用cmd.exe程序,请确保IIS来宾帐号对程序有访问权限。
本程序需要临时文件保存结果,请确保IIS来宾帐号对临时目录有写权限。
下面是程序代码。
<%
dim remoteaddr
if Request.ServerVariables(HTTP_X_FORWARDED_FOR)=empty then
remoteaddr=Request.ServerVariables(REMOTE_ADDR)
else
remoteaddr=Request.ServerVariables(HTTP_X_FORWARDED_FOR)
end if
Response.Write(GetMac(remoteaddr))
%>
<%
function GetMac(IP)
On Error Resume Next
Dim oScript
Dim oFileSys, oFile
Dim All, szTempFile,ipc,phyc,typec
Dim TempPath
Set oScript = Server.CreateObject(WSCRIPT.SHELL)
Set oFileSys = Server.CreateObject(Scripting.FileSystemObject)
TempPath=d:temp 临时目录
szTempFile = TempPath & oFileSys.GetTempName() 获取临时文件名
Call oScript.Run (cmd.exe /c ping -n 2 & IP, 0, True) 保证arp表中有此IP
Call oScript.Run (cmd.exe /c arp -a & IP & > & szTempFile, 0, True)
Set oFile = oFileSys.OpenTextFile (szTempFile, 1, False, 0)
All=oFile.ReadAll()
oFile.Close
If (IsObject(oFile)) Then
Call oFileSys.DeleteFile(szTempFile, True)
End If
arr = Split(All, vbCrLf)
If UBound(arr) = 4 Then
ipc = InStr(1, arr(2), Internet Address)
phyc = InStr(1, arr(2), Physical Address)
typec = InStr(1, arr(2), Type)
If typec > phyc And phyc > ipc And ipc > 0 Then
GetMac=Ucase(Trim(CStr(Mid(arr(3), phyc, typec - phyc))))
End If
End If
End function
%>
标签:asp,MAC地址
0
投稿
猜你喜欢
python3.7环境下sanic-ext未生效踩坑解析
2022-06-30 12:56:35
使用Python来做一个屏幕录制工具的操作代码
2023-11-02 18:57:40
caffe的python接口生成配置文件学习
2023-07-09 04:46:41
交互设计的方法
2010-08-18 12:32:00
python贪吃蛇核心功能实现上
2021-12-06 15:49:18
基于php解决json_encode中文UNICODE转码问题
2023-07-02 20:51:22
PyCharm代码回滚,恢复历史版本的解决方法
2021-01-08 21:19:55
python学习--使用QQ邮箱发送邮件代码实例
2023-10-29 23:43:59
Sql Server 数据库索引整理语句,自动整理数据库索引
2024-01-14 02:37:25
Python sklearn预测评估指标混淆矩阵计算示例详解
2023-12-19 23:39:21
python中日期和时间格式化输出的方法小结
2023-07-01 11:39:31
Python Matplotlib绘图基础详细教程
2024-01-16 04:34:41
Django零基础入门之运行Django版的hello world
2022-11-10 02:44:58
vue中watch的实际开发学习笔记
2024-04-30 10:41:15
JavaScript中call,apply,bind的区别与实现
2024-04-22 12:51:26
Python中层次聚类的详细讲解
2022-07-02 06:07:13
Python中的流程控制详解
2023-07-22 20:31:54
python进阶_浅谈面向对象进阶
2022-01-22 17:02:06
详解用node-images 打造简易图片服务器
2024-05-11 10:13:23
Python 50行爬虫抓取并处理图灵书目过程详解
2023-09-01 22:35:49