lsq0620 发表于 2021-3-22 06:44

易语言取IP源码

小白自己乱弄的,刚学一两天,代码思路还不咋滴

lsq0620 发表于 2021-3-22 06:47

‪C:\Users\18760\Desktop\捕获.PNG

lsq0620 发表于 2021-3-23 16:55

.版本 2
.支持库 RegEx
.支持库 iconv
.支持库 internet

.子程序 IP, 文本型
.局部变量 正则表达式, 正则表达式
.局部变量 结果, 搜索结果
.局部变量 句柄, 整数型
.局部变量 文本, 文本型

句柄 = 编码转换_打开 (#编码_UTF_8, #编码_GBK)
文本 = 到文本 (编码转换_转换 (句柄, HTTP读文件 (“https://2021.ip138.com/”), ))' https://2021.ip138.com/
编码转换_关闭 (句柄)
正则表达式.创建 (“您的IP地址是:\d+\.\d+\.\d+\.\d+”, 假)
结果 = 正则表达式.搜索 (文本, 1, )
返回 (结果.取匹配文本 (文本, ))

lsq0620 发表于 2021-3-23 16:58

不知道怎么了易语言不给我用((25|2\d|?\d\d?|)\.){3}(25|2\d|?\d\d?|) 这个表达式,这是精确的查找,学习半天正则然后搞出来的,小菜鸟

xxhaishixx 发表于 2021-3-29 22:18

这样获取在一定限度上是可以的,但是每天是有次数限制和短时间内获取会出问题,建议用tcp协议连接服务器来获取,这样很方便,而且没有时间限制。网页的容易出问题。
页: [1]
查看完整版本: 易语言取IP源码