取外网IP地址与地理位置模块

zeg922 · 发表于 2017-2-20 00:52:13

1009122681 发表于 2017-2-20 00:40
除非你的网络不行，只要能打开网页肯定能取到

通过论坛搜索，http://bbs.125.la/forum.php?mod= ... 44&highlight=IP 参考此帖子的读取方式，解决问题了。你的那个模块，确实会在我这里出现有的机器取不到IP，而是空白的情况。

1009122681 · 发表于 2017-2-20 00:40:49

zeg922 发表于 2017-2-19 23:33
我在有的电脑上发现取不到IP。是空白的。局域网中，有的能取到IP，有的不行。

除非你的网络不行，只要能打开网页肯定能取到

zeg922 · 发表于 2017-2-19 23:33:02

我在有的电脑上发现取不到IP。是空白的。局域网中，有的能取到IP，有的不行。

zeg922 · 发表于 2017-2-19 22:57:14

1425113841 发表于 2017-2-10 23:52
我刚刚分析了一下利用百度IP来获取蛮简单的
因为他的代码包含了外部支持库所以我这里稍作修改
...

我在有的电脑上发现取不到IP。是空白的。局域网中，有的能取到IP，有的不行。

zeg922 · 发表于 2017-2-19 13:59:32

1425113841 发表于 2017-2-19 12:20
对方重启路由 IP就变了

固定IP。不怕。

1425113841 · 发表于 2017-2-19 12:20:55

zeg922 发表于 2017-2-19 01:01
这样，直接取到IP。不知道有没有什么问题。我要用取到的IP来做验证，只能在这个IP下使用。

对方重启路由 IP就变了

zeg922 · 发表于 2017-2-19 01:01:42

1425113841 发表于 2017-2-10 23:52
我刚刚分析了一下利用百度IP来获取蛮简单的
因为他的代码包含了外部支持库所以我这里稍作修改
...

这样，直接取到IP。不知道有没有什么问题。我要用取到的IP来做验证，只能在这个IP下使用。

zeg922 · 发表于 2017-2-18 23:53:59

正需要取外网IP的模块呢

sxlldaj · 发表于 2017-2-11 11:15:07

新手学习了，谢谢楼主分享

1425113841 · 发表于 2017-2-10 23:52:45

我刚刚分析了一下利用百度IP来获取蛮简单的
因为他的代码包含了外部支持库所以我这里稍作修改
他应该用了外部支持库的编码转换文本取中间所以我这里用精易模块写出来

子程序名	返回值类型	公开	备注
取外网IP			取外网物理IP地址，取出的IP地址和物理地址格式为：IP地址/地理位置

变量名	类型	静态	数组	备注
返回内容	文本型
IP	文本型
归属地	文本型

返回内容＝网页_访问S (“http://www.baidu.com/s?wd=IP”)
IP ＝文本_取出中间文本 (返回内容, “本机IP: ”, “”)
' 调试输出 (“========》欢迎使用<恍若一梦>模块《======”)
归属地＝文本_取出中间文本 (返回内容, “属于”, “。查ip归属地”)
返回 (IP ＋ “/” ＋归属地)

i支持库列表	支持库注释
spec	特殊功能支持库

		自动登录	找回密码
密码			注册

[易语言成品模块] 取外网IP地址与地理位置模块