易语言获取外网ip方法

看内容会很失望,让人hurt的易语言,没办法帮别人看一个易语言的程序,要添加这个东西,其实这是我第一次接触,然后修改和写易语言的程序。

创新互联建站是一家专注于网站设计制作、网站设计与策划设计,若羌网站建设哪家好?创新互联建站做网站,专注于网站建设十载,网设计领域的专业建站公司;建站业务涵盖:若羌等地区。若羌做网站价格咨询:18980820575

代码如下:

.版本 2

.子程序 取外网IP, 文本型, 公开, 取外网IP
.局部变量 原文, 文本型
.局部变量 过度, 文本型, , "0"
.局部变量 IP, 文本型

原文 = 到文本 (彗星HTTP读文件 (“http://www.ip138.com/ip2city.asp”))
过度 = 分割文本 (原文, “您的IP地址是:[”, )
.如果 (取数组成员数 (过度) < 2)
  返回 (“”)
.否则

.如果结束
IP = 子文本替换 (过度 [2], “] ”, “”, , , 假)
返回 (IP)

以上就是本次知识点的全部内容,感谢大家对创新互联的支持。


文章名称:易语言获取外网ip方法
分享地址:http://ybzwz.com/article/gjdhjo.html