xieeyawen 发表于 2025-4-25 17:25:48

根据坛友代码改良获取mac和ip地址的代码

本帖最后由 xieeyawen 于 2025-4-25 17:35 编辑


axlCmdRegister("getMacIp" 'getMacIp ?cmdType "generl")
procedure( getMacIp()
prog((p a ln macid ipid)
    system("ipconfig /all > ipdata.txt")
    p = axlDMOpenFile("TEMP" "ipdata.txt", "r") ;从读ipdata.txt这个输入端口获得里面的字符串
   
                while(gets(ln, p)
                        when(index(ln, "\316\357\300\355\265\330\326\267") || index(ln, "Physical Address" )
                        macid = car(last(parseString(ln, ": \n")))
                          );endwhen
                        when(index(ln, "IPv4 \265\330\326\267") || index(ln, "IPv4 Address" )
                                a=parseString(ln, ": ( ) \n")
                                ipid = nth((length(a)-2) a)
                          );endwhen
                          );endwhile
                axlDMClose(p);必须关掉端口才能输出，不关掉端口就相当于txt文件是空文件
                deleteFile("./ipdata.txt")
                println(macid)
                println(ipid)
    ); end prog
); end procedure

bingshuihuo 发表于 2025-4-25 17:59:28

赞！！！！！！！！！1

15835255738 发表于 2025-5-5 23:51:27

请问这个skill主要作用是什么啊

werkey 发表于 2025-5-7 10:11:26

谢谢分享

xieeyawen 发表于 2025-5-7 15:05:40

15835255738 发表于 2025-5-5 23:51
请问这个skill主要作用是什么啊

经常需要用到局域网远程，可以快速查看我的ip。当然你也可以发挥想象力做其他的扩展

xieeyawen 发表于 2025-6-11 15:48:04

1

xieeyawen 发表于 2025-6-11 15:48:07

2

xieeyawen 发表于 2025-6-11 15:48:11

3

xieeyawen 发表于 2025-6-11 15:48:13

4

xieeyawen 发表于 2025-6-11 15:48:15

5
页: [1] 2
查看完整版本: 根据坛友代码改良获取mac和ip地址的代码