|
论坛IP检测和 精易模块的 Ip_取外网IP() 地址都是错误的
不知道你们发觉没有....
我的正确iP
建议更换- .版本 2
- .支持库 internet
- .子程序 ip_取本机外网IP1, 文本型, 公开
- .参数 耗时, 整数型, 参考 可空, 获取所耗的时间,单位:毫秒
- .局部变量 ip地址, 文本型
- 耗时 = 取启动时间 ()
- ip地址 = 到文本 (HTTP读文件 (“http://ip.tool.la/”))
- ip地址 = 删全部空 (取文本中间 (ip地址, 寻找文本 (ip地址, “您的IP是:”, , 假) + 10, 寻找文本 (ip地址, “ 来自”, , 假) - 寻找文本 (ip地址, “您的IP是:”, , 假) - 10))
- 耗时 = 取启动时间 () - 耗时
- 返回 (ip地址)
- .子程序 ip_取本机外网IP2, 文本型, 公开
- .参数 耗时, 整数型, 参考 可空, 获取所耗的时间,获取所耗的时间,毫秒:毫秒
- .局部变量 ip地址, 文本型
- 耗时 = 取启动时间 ()
- ip地址 = 到文本 (HTTP读文件 (“http://www.123cha.com/”))
- ip地址 = 删全部空 (取文本中间 (ip地址, 寻找文本 (ip地址, “com/ip/?q=”, , 假) + 10, 寻找文本 (ip地址, “ target=_blank>”, , 假) - 寻找文本 (ip地址, “com/ip/?q=”, , 假) - 10))
- 耗时 = 取启动时间 () - 耗时
- 返回 (ip地址)
复制代码 @冰点 @‘一叶知秋
|
|