易语言获取本机ip并保存为文本,谢谢大神

2025-06-27 07:08:47
推荐回答(1个)
回答1:

主要三个命令就可以了

.版本 2
.支持库 internet
.支持库 sock

.局部变量 外网IP, 文本型
.局部变量 内网IP, 文本型, , "0"
.局部变量 路径, 文本型

外网IP = 到文本 (HTTP读文件 (“http://www.3322.org/dyndns/getip”))
编辑框_外网.内容 = 外网IP
内网IP = 取本机IP ()
.判断开始 (是否已在线 () = 真)
    编辑框_内网.内容 = 内网IP [2]
.默认
    编辑框_内网.内容 = 内网IP [1]
.判断结束

路径 = 到文本 (取运行目录 () + “/ip.txt”)

写到文件 (路径, 到字节集 (编辑框_内网.内容) + 到字节集 (#换行符) + 到字节集 (编辑框_外网.内容))