易语言取本机ip源码(易语言IP代理源码)
本文目录一览:
易语言 取本机IP 并显示 怎么弄 求源码 代码!!
版本 2
.支持库 spec.子程序 _按钮2_被单击编辑框2.内容 = 子程序_取IP地址 (“+”).子程序 子程序_取IP地址, 文本型
.参数 参数_变量, 文本型
.局部变量 局部_输出缓冲区长度, 整数型
.局部变量 局部_数组, 字节型, , "0"
.局部变量 局部_IP转接器信息, IP转接器信息_
.局部变量 局部_P地址文本, IP地址文本_
.局部变量 局部_下一结构地址, 整数型
.局部变量 局部_临时, 字节集
.局部变量 局部_计次, 整数型取适配器信息 (0, 局部_输出缓冲区长度)
.如果真 (局部_输出缓冲区长度 > 0)
重定义数组 (局部_数组, 假, 局部_输出缓冲区长度 - 1)
.如果真 (取适配器信息1_ (局部_数组 [1], 局部_输出缓冲区长度) = 0)
局部_下一结构地址 = 取变量地址 (局部_数组 [1])
.判断循环首 (局部_下一结构地址 > 0)
拷贝内存_ (局部_IP转接器信息, 局部_下一结构地址, 640)
局部_临时 = 取空白字节集 (取数组成员数 (局部_IP转接器信息.IpAddressList.IpAddress.IpAddr))
.计次循环首 (取数组成员数 (局部_IP转接器信息.IpAddressList.IpAddress.IpAddr), 局部_计次)
局部_临时 [局部_计次] = 局部_IP转接器信息.IpAddressList.IpAddress.IpAddr [局部_计次]
.计次循环尾 ()
局部_下一结构地址 = 局部_IP转接器信息.下一结构地址
.判断循环尾 ()
返回 (取字节集数据 (局部_临时, #文本型, ))
客户1.发送数据 (编辑框2.内容) .如果真结束.如果真结束
返回 (“”)
易语言如何获取本机ip,求源码
调试输出 (转换为IP地址 (取主机名 ()))
——————————————————
没有支持库就:工具——支持库配置——全选——确定
易语言怎么编写出可以查看本机机器码的,就是IP值,希望给个源码模仿!
调用格式易语言取本机ip源码: 〈文本型数组〉 取本机IP () - 网络通讯支持库-网络通讯
英文名称易语言取本机ip源码:get_local_ip
取本机IP,返回IP列表数组。本命令为初级命令。
操作系统需求易语言取本机ip源码: Windows、Linux
代码例子:
.版本 2
.支持库 sock
.支持库 spec
.局部变量 a, 文本型, , "0"
.局部变量 i, 整数型
a = 取本机IP ()
.计次循环首 (取数组成员数 (a), i)
调试输出 (a [i])
.计次循环尾 ()