简易的获取外网IP软件。新人源码！大手绕道

爱瑶瑶

新人源码！新人源码！新人源码！大手绕道
最近挂VPN玩外游，有时VPN不稳定老要开百度查ip看看VPN是不是连上了。
然后今天无聊就写了个小软件获取IP，源码分享出来给需要的。

  

子程序名	返回值类型	公开	备 注
QQip查询

变量名	类 型	静态	数组	备 注
A	文本型
B	文本型

A ＝ 到文本 (HTTP读文件 (“http://ip.qq.com/”))
qqip ＝ 文本_取出中间文本 (A, #QQip常量1, #QQip常量2 )
QQ查询到的ip.标题 ＝ qqip
B ＝ 文本_取出中间文本 (A, #QQip常量3, #QQip常量4 )
qq地址 ＝ 子文本替换 (B, “ ”, “  ”, , , 真)
QQ查询到的地址.标题 ＝ qq地址

i支持库列表	支持库注释
internet	互联网支持库

.版本 2<br /> .支持库 internet<br /> <br /> .子程序 QQip查询<br /> .局部变量 A, 文本型<br /> .局部变量 B, 文本型<br /> <br /> A ＝ 到文本 (HTTP读文件 (“<a href="http://ip.qq.com/" rel="nofollow" rel="nofollow" target="_blank">http://ip.qq.com/</a>”))<br /> qqip ＝ 文本_取出中间文本 (A, #QQip常量1, #QQip常量2)<br /> QQ查询到的ip.标题 ＝ qqip<br /> B ＝ 文本_取出中间文本 (A, #QQip常量3, #QQip常量4)<br /> qq地址 ＝ 子文本替换 (B, “ ”, “  ”, , , 真)<br /> QQ查询到的地址.标题 ＝ qq地址

常量1：“您当前的IP为：<span class="red">”

常量2：“</span></p>”


需要又不想下载的参考上面的自己写就行了，很简单。

624381630

沙发

qiaoyiming

支持楼主支持楼主

pjy204

支持楼主支持楼主

笑离歌L

谢谢分享   有用

z25856666

正需要，非常好，赞一个

花到不得了

正需要，非常好，赞一个

wucz

#在这里快速回复#分享到:   QQ好友和群QQ好友和群   QQ空间QQ

wojinz

厉害啊word领导

guoxizun

6666666666666666666666666