网站 › 『 编程之美 』 › 显示你的外网IP及IP所在地

枫影 发表于 2006-9-5 11:06:49

显示你的外网IP及IP所在地

下载程序

需要一个标签就OK了

.版本 2
.支持库 internet

.局部变量 内容, 文本型
.局部变量 开始地方, 整数型
.局部变量 结束地方, 整数型
.局部变量 变量, 整数型

内容 ＝ 到文本 (HTTP读文件 (“http://www.ipseeker.cn”))
开始地方 ＝ 寻找文本 (内容, “官方数据查询结果：”, , 假) ＋ 19
结束地方 ＝ 寻找文本 (内容, “</p>”, 开始地方, 假)
内容 ＝ 取文本中间 (内容, 开始地方, 结束地方 － 开始地方)
内容 ＝ 文本替换 (内容, 寻找文本 (内容, “&nbsp;”, , 假), 15, “”)
标签1.标题 ＝ 内容

枫影 发表于 2006-9-5 11:18:45

看到程序的源代码你可能觉得很简单!!
但我觉得这招很有用,现在有很多查IP所在地的工具都是把数据库存在本地,用这个方法就不需要了..呵呵...

秋风下的落叶 发表于 2006-9-7 18:10:31

tantan2010 发表于 2006-10-29 12:43:10

呵呵，已经有这样的软件了

tantan2010 发表于 2006-10-29 12:43:57

学习一下也不错的

zzpyu 发表于 2009-5-23 15:50:48

知识是慢慢得来的/:good

milse100 发表于 2009-5-25 19:54:45

谢谢分享！！

·.χiㄡ欠 发表于 2009-6-5 23:14:31

做的不错！
为什么不把**E 文件发布出来啊！

笨鸟我先飞 发表于 2009-6-15 13:51:35

读取网页源码吧？用正则要好的多了就是速度不怎么理想

雾凇0902 发表于 2009-6-19 16:28:20

进来学习了

查看完整版本: 显示你的外网IP及IP所在地