常量据表
.版本 2
.常量 查ip地址, "<文本长度: 17>", , {"code":0,"data":
调用百度api获取ip归属地的代码
此功能需要加载精易模块5.6
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 取IP归属地_百度API, 文本型, 公开
.参数 IP地址, 文本型
.局部变量 Json, 类_json
.局部变量 返回数据, 文本型
.局部变量 地区, 文本型
CoInitialize (0)
返回数据 ＝ 到文本 (网页_访问_对象 (“http://opendata.baidu.com/api.php?query=” ＋ IP地址 ＋ “&co=&resource_id=6006&t=” ＋ 时间_取现行时间戳 () ＋ “&ie=utf8&oe=gbk&cb=op_aladdin_callback&format=json&tn=baidu&cb=jQuery1102026811896078288555_1412299994977&_=1412299994981”, 0, , , , , , , , , , , , , , ))
返回数据 ＝ 文本_取出中间文本 (返回数据, “[”, “]”)
返回数据 ＝ #查ip地址 ＋ 返回数据 ＋ “}”
Json.解析 (返回数据)
地区 ＝ Json.取通用属性 (“data.location”)
返回 (地区)
.子程序 _获取归属地按钮_被单击
归属地编辑框.内容 ＝ 取IP归属地_百度API (到文本 (IP地址编辑框.内容))
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对天达云的支持。如果你想了解更多相关内容请查看下面相关链接