易语言扫描指定IP段的MAC信息源码

1、启动窗口贴图口 X动窗口（窗口）备注在程序启动后自动左边50顶边50宽度302周度241标记可视真禁止鼠标指针默认型标题AKP扫描器边柩普通固定边框隋色默认底色三底圈底圈方式阕片平铺R斤_曰播放砍数循环播放控制按钮真最大化按翅最小化按钮假位置居中可否移动其图标回车下移德点E，匚镖关闭其F1镖打开帮助帮助文件名希助标志值0在任务条中显示真疆意移动假由卜形矩形总在最前暇混:K捻朗i冬藏好名称美动窗口在此处迷择加入事件姓理子程序工J支持库 国1程序 曾属性X 动窗口 E 此L命令定贝有又窗口程序集房7字体类型报表列表推图标对齐方式顶部对齐自动排列图标真标题自动换行真报表列无表头1段表美图片蛆表头可单

2、击其整行选择真显示表格统暇表列可拖动图片组状态图片蛆1i热点跟踪手形指外真标注菲热点真标注热点真允许编辑暇排序方式不排序是否有检萱框1段平面潦动条傲单一选择现行选中项始缓显示选择项暇表项结束编辑交本.秋只读屈性*超级列表框1 （超缀列表惟）口 X编辑椎1 （编辑椎）名称蝙割康土备注左边56顶边8宽度80周度0标记可视真禁止鼠标指针默认型可停留蔑点其停留顺序01内容192L168.0. 1边推凹人式文本颜色黑色背景颜色白色字体隐藏选择真最大允许长度0是否允许多行潦动条无对齐方式左对弁输入方式通常方式密码遮盖字符*砖换方式无调节器方式无调节器调节器底限值0调节器上限值100起始选择位置0被於择字符

3、数0被选择文本咐设计时不可用数据源甲在此处选择加入事件进理子程序奏支持库程序惭属性IF段:1192. 168.0. 1线程数：（35 扫描IPMAC地址X启动窗口 t E命令定义表I 窗口程序集厂7标签 （标签）名称标签Z番注左迪144顶边8宽度48高度20标记可视真禁止鼠标指针默认型可停留焦点*无效*停留顺序0|标题戏程数:；-厘果通常边椎无边椎渐变边椎宽度8渐变边框颜色1灰色渐变边椎颜色白色渐变边椎颜色刁家色字体文本颜色1黑色背景颜色默认底色底图底圈方式图片平铺渐变背方式无渐变背景渐变背景颜色1灰色渐变背景颜色白色渐变背景颜色3灰色横向对齐方式左对齐是否皂动折行魏向对齐方式居中数据源法提期

4、1*在此处选择加五事件处理子程序 X编辑椎2 （编辑植）T名称褊辑框-h.告注左边192顶边8宽度24同度0标记可视真禁止鼠标指针默认型可停留凭点真停留顺序0II内容35边柩凹人式文本颜色1黑色背晨颜色白色字体隐藏选择真最大允许长度3是否允许多行禳动条元对齐方式居中输芬式整数文本输入密码遮盖字符*转换方式无调节器方式自动调节器调节器底限值1调节器上限值255起始选择位置0被选择字符数0被选择文本顾设计时不可用数据源CT X走此处选择加入事件处理子程序F段：1192. 168.0. 1 统程数:|脂：甘扫描 jIf匚地址DLL命令定义表.版本2,DLL 命令 API_SendARP,整数型,IP

5、HLPAPI.DLL, SendARP.参数目标IP,参数本机IP,参数MAC缓冲，字节型，传址数组,参数长度,，传址,DLL 命令 API_inet_addr,整数型，ws2_32.dll, inet_addr”,参数IP,文本型,DLL 命令 API_ntohl,整数型,ws2_32.dll, ntohl,参数netlong,整数型,DLL命令 API取整数型地址，整数型,kernel32”, lstrcpynA,参数lpStringl,传址,参数lpString2,传址,参数 iMaxLength,DLL命令 API取字节型地址，整数型,kernel32”, lstrcpynA,参数lp

6、Stringl,字节型，传址,参数lpString2,字节型，传址.参数 iMaxLength,DLL 命令 API_CopyMemory, , kernel32, RtlMoveMemory.参数pDest,整数型,参数pSrc,整数型,参数ByteLen,整数型.DLL 命令 API_inet_ntoa,整数型,ws2_32.dll, inet_ntoa.参数 IP.DLL 命令 API_CreateThread,整数型，kernel32.dll, CreateThread,参数 lpThreadAttributes,整数型,参数dwStackSize,整数型,参数lpStartAddre

7、ss,子程序指针,参数lpParameter,整数型,参数 dwCreationFlags,整数型,参数lpThreadId,整数型，传址窗口程序集1,版本2,支持库iext,程序集窗口程序集1,程序集变量IP段，字节集,程序集变量IP,文本型,，0,程序集变量MAC,文本型,，0,子程序_按钮1_被单击IP段=到字节集（API_inet_addr （编辑框1,内容）IP 段4 = 0重定义数组（IP,假,255）重定义数组（MAC,假,255）超级列表框1,全部删除（）,计次循环首（到整数（编辑框2,内容）,）API_CreateThread （0, 0, & 扫描,0, 0, 0）,计次循

8、环尾（）.子程序扫描.局部变量 缓冲，字节型,，6”.局部变量地址，字节集.局部变量当前IP.局部变量I当前IP =标签1.调用反馈事件（#取IP,真）.判断循环首（当前IP尹0）.如果真（API_SendARP （当前 IP, 0,缓冲,6） = 0）地址=到字节集（当前IP）.计次循环首（6, I）.如果真（缓冲I 16）MAC 地址4 = MAC 地址4 + “0”.如果真结束MAC 地址4 = MAC 地址4 +取十六进制文本（缓冲I） + -”.计次循环尾（）IP 地址4= 指针到文本（API_inet_ntoa （当前IP）MAC 地址4= 取文本左边（MAC 地址4, 17）标签1.调用反馈事件（#完成，地址4,）.如果真结束当前IP =标签1.调用反馈事件（#取IP,真）.判断循环尾（）子程序_标签1_反馈事件，整数型.参数参数一，整数型.参数参数二，整数型.局部变量行.判断开始渗数一 =#取IP）.如