易语言获取外网ip方法 - 行业资讯 - 肥雀云

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

代码如下:

　　　　　　第2版。本　　　　,子程序取外网IP,文本型,公开,取外网IP 　　。局部变量原文,文本型　　。局部变量过度,文本型,,“0” 　　。局部变量IP,文本型　　　　原文=到文本(彗星HTTP读文件(" http://www.ip138.com/ip2city.asp ")) 　　过度=分割文本(原文,“您的IP地址是:[",) 　　。如果(取数组成员数(过度)<2) 　　返回(" ") 　　否,则　　　　。如果结束　　IP=子文本替换(过度[2],”]& lt;/center> & lt;/body> & lt;/html> ", " ",,,假) 　　返回(IP) 　　　　

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