易语言调用百度API获取IP归属地的代码

常量据表

.版本 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地址编辑框.内容))

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

(0)

相关推荐

  • 易语言开发ip查看程序教学

    易语言开发ip查看程序,打开就可以看到本机的外网地址. 1.打开易语言程序,在程序菜单选择新建 windows窗口程序,适当的点击程序边角放大程序界面. 2.在工作夹找到标题项,更改程序的标题为 "ip查看". 3.在点击窗口组件箱中的基本组件中编辑框按钮,在程序界面上点击,放到合适的位置. 4.在点击窗口组件箱中的基本组件中标签按钮,在程序界面上点击,放到合适的位置.在工作夹找到标题项,更改标签的标题为 "IP". 5.在工作夹下方点击程序,双击模块引用表,找到准

  • 易语言将指定的主机名与IP地址转换功能

    这个功能要用到以下几个命令: 转换为主机名命令 转换为IP地址命令 将指定的主机名转换为其 IP 地址,或将指定的 IP 地址转换为其主机名,如果失败返回空文本. 例程: 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

  • 易语言调用SetClipboardViewer的api实现剪贴版的内容监控

    DLL命令表 .版本 2 .DLL命令 加入剪贴板监视链_d, 整数型, "user32.dll", "SetClipboardViewer", 公开, 成功,返回值将标识剪贴板查看器链中的下一个窗口.如果出现错误或剪贴板查看器链中没有其他窗口,则返回值为空.( hwndNextViewer 将为 NULL.) .参数 窗口句柄, 整数型, , hwnd 加入剪切板监视链中窗口句柄 .DLL命令 设置窗口信息_d, 整数型, "user32",

  • 易语言获取外网ip方法

    看内容会很失望,让人hurt的易语言,没办法帮别人看一个易语言的程序,要添加这个东西,其实这是我第一次接触,然后修改和写易语言的程序. 代码如下: .版本 2 .子程序 取外网IP, 文本型, 公开, 取外网IP .局部变量 原文, 文本型 .局部变量 过度, 文本型, , "0" .局部变量 IP, 文本型 原文 = 到文本 (彗星HTTP读文件 ("http://www.ip138.com/ip2city.asp")) 过度 = 分割文本 (原文, "

  • 易语言纯IP数据库查询代码实例

    以下是我们给大家分享了易语言IP数据库查询相关的内容代码,大家可以测试下 .版本 2 .支持库 spec .程序集 程序集1 .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码 _临时子程序 () ' 在初始化代码执行完毕后调用测试代码 返回 (0) ' 可以根据您的需要返回任意数值 .子程序 _临时子程序 ' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中. ***注意不要修改本子程序的名称

  • 易语言制作IP代理程序教学

    IP代理相信大家都比较了解,这里不废话了,这里用易语言制作的也是一个简单的IP代理,只能设置网页的代理,并不能进行全局的IP代理!IP通过网页进行获取! 1.打开易语言,新建windows窗口程序,简单做一个界面,这我们用一个超级列表框来显示获取到的IP 2.先看看采集IP的网址,这里选用快代理,好处就是自带了验证,所以写的软件就不带验证项了. 3.超级列表框设为报表,设置报表列,整行选择为真,显示格线为真! 4.因为用到正则,所以新建一个常量,用于存放匹配表达式,共进行了6处的匹配! 5.看代

  • 易语言破解WPS的VIP模版下载地址

    DLL命令表 .版本 2 .DLL命令 API下载文件, 整数型, "urlmon", "URLDownloadToFileA", , -下载文件 .参数 pcaller, 整数型 .参数 szurl, 文本型 .参数 szfilename, 文本型 .参数 dwreserved, 整数型 .参数 lpfncb, 整数型 常量数据表 .版本 2 .常量 id, "<文本长度: 21>", , "big":[{&qu

  • 易语言调用百度API获取IP归属地的代码

    常量据表 .版本 2 .常量 查ip地址, "<文本长度: 17>", , {"code":0,"data": 调用百度api获取ip归属地的代码 此功能需要加载精易模块5.6 .版本 2 .程序集 窗口程序集_启动窗口 .子程序 取IP归属地_百度API, 文本型, 公开 .参数 IP地址, 文本型 .局部变量 Json, 类_json .局部变量 返回数据, 文本型 .局部变量 地区, 文本型 CoInitialize (0) 返

  • 易语言调用百度api识别是否为色情图片的代码

    调用百度云色情图片识别的代码 此功能需要加载精易模块5.6 .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 _识别按钮_被单击 百度云色情识别 () .子程序 百度云色情识别 .局部变量 类_XMLHTTP, 类_XMLHTTP .局部变量 Accesss_token, 文本型 .局部变量 str, 文本型 Accesss_token = GetAccesss_token () 类_XMLHTTP.打开 ("POST", "https://aip.b

  • 易语言调用百度文字识别api方法

    现在百度ai特别强大,很多大公司都是调用百度的数据,那么对于习惯易语言的我们改怎么操作呢?今天以百度ai文字识别为例. 首先打开百度ai平台 注册或登录百度账号,进入控制台,选择文字识别 新建应用,获取appid和app key 选择技术文档,api文档 参考第一个调用方式,通过url调用 要获取token请参考相关链接 然后根据参数说明填写相关代码,最后结果如下: .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .子程序 _按钮1_被单击 .局

  • 易语言调用百度语音平台实现文字转换语音功能的代码

    调用百度语音平台实现文字转换语音功能 此功能需要加载精易模块5.6 .版本 2 .支持库 wmp9 .程序集 窗口程序集1 .子程序 _试听按钮_被单击 播放器1.地址 = "http://tts.baidu.com/text2audio?lan=zh&pid=101&ie=UTF-8&text=" + 编码_URL编码 (内容编辑框.内容, , 真) + "&spd=5&per=4" ' 参数 可需 描述 ' tex 必填

  • 易语言调用GetUserPassWord.dll获取系统开机密码

    DLL命令表 .版本 2 .DLL命令 取开机密码, 文本型, "GetUserPassWord.dll", "GetUserPassWord", 公开 获取系统登录密码的代码 .版本 2 .程序集 窗口程序集1 .子程序 获取开机, 文本型 .局部变量 密码, 文本型 .局部变量 帐号, 文本型 .局部变量 最终文本, 文本型 帐号 = 读环境变量 ("USERNAME") 密码 = 取电脑开机密码 () 最终文本 = "密码类型:开

  • 易语言调用百度的真相问答制作真相问答机的代码

    全局变量表 .版本 2 .全局变量 源文件, 文本型 .全局变量 答案, 文本型 常量数据表 .版本 2 .常量 常量1, "<文本长度: 9>", , -middle"> .常量 常量2, "<文本长度: 7>", , </span> .常量 常量3, "<文本长度: 7>", , proof"> .常量 常量4, "<文本长度: 7>&quo

  • 易语言调用百度图片识别实现的图片转表格的代码

    截图模块代码 .版本 2 .子程序 开始截图, 逻辑型, 公开, 截图成功返回真,图片被自动保存到剪贴板.失败或放弃截图则返回假. .参数 是否截取鼠标, 逻辑型, 可空 .参数 调节框颜色, 整数型, 可空, 默认:Red=10,Green=100,Blue=130 .参数 矩形信息框颜色, 整数型, 可空, 默认黑色 .参数 矩形信息字体颜色, 整数型, 可空, 默认黑色 .子程序 取剪贴板位图, 字节集, 公开 表格图片转表格源码 此功能需要加载精易模块5.6 .版本 2 .支持库 edr

  • 易语言调用微信PrScrn.dll文件进行截图的代码

    DLL命令表 .版本 2 .DLL命令 GetProcAddress, 整数型, "kernel32", "GetProcAddress", , 返回函数地址 .参数 hModule, 整数型 .参数 lpProcName, 文本型 .DLL命令 GetModuleHandle, 整数型, "kernel32", "GetModuleHandleA", , 获取一个应用程序或动态链接库的模块句柄 如执行成功成功,则返回模块句柄

  • 易语言调用dll实现条形码本地离线识别的代码

    DLL命令表 需要提前下载用到命令对应的库 .版本 2 .DLL命令 OCR, 文本型, "AspriseVB.dll", "OCR" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRBarCodes, 文本型, "VBWrapper.dll", "OCRBarCodes" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRpart, 文本型, &quo

  • Python编程调用百度API实现地理位置经纬度坐标转换示例

    目录 1.1,用百度账号登陆百度地图控制台 1.2,创建一个应用,获取 AK 参数 1.3,地理编码.逆地理编码 1.3.1 地理编码 1.3.2 逆地理编码 经纬度坐标转换最常见办法就是调用第三方 API,例如百度.高德地图等服务平台,提供了相应的功能接口,它们的这类技术已经非常成熟啦,准确稳定,关键还是免费的 ~ 本期教程以百度为例(高德的用方类似),介绍一下其用法 1.1,用百度账号登陆百度地图控制台 百度地图开放平台 1.2,创建一个应用,获取 AK 参数 登录控制台之后,选择左侧 应用

随机推荐