易語(yǔ)言調(diào)用百度API獲取IP歸屬地的代碼
更新時(shí)間：2018年11月26日 14:02:44 作者：易語(yǔ)言源碼教程
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用百度API獲取IP歸屬地的代碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧
常量據(jù)表
.版本 2
.常量 查ip地址, "<文本長(zhǎng)度: 17>", , {"code":0,"data":
調(diào)用百度api獲取ip歸屬地的代碼
此功能需要加載精易模塊5.6
.版本 2 .程序集 窗口程序集_啟動(dòng)窗口 .子程序 取IP歸屬地_百度API, 文本型, 公開(kāi) .參數(shù) IP地址, 文本型 .局部變量 Json, 類_json .局部變量 返回?cái)?shù)據(jù), 文本型 .局部變量 地區(qū), 文本型 CoInitialize (0) 返回?cái)?shù)據(jù) ＝ 到文本 (網(wǎng)頁(yè)_訪問(wèn)_對(duì)象 (“http://opendata.baidu.com/api.php?query=” ＋ IP地址 ＋ “&co=&resource_id=6006&t=” ＋ 時(shí)間_取現(xiàn)行時(shí)間戳 () ＋ “&ie=utf8&oe=gbk&cb=op_aladdin_callback&format=json&tn=baidu&cb=jQuery1102026811896078288555_1412299994977&_=1412299994981”, 0, , , , , , , , , , , , , , )) 返回?cái)?shù)據(jù) ＝ 文本_取出中間文本 (返回?cái)?shù)據(jù), “[”, “]”) 返回?cái)?shù)據(jù) ＝ #查ip地址 ＋ 返回?cái)?shù)據(jù) ＋ “}” Json.解析 (返回?cái)?shù)據(jù)) 地區(qū) ＝ Json.取通用屬性 (“data.location”) 返回 (地區(qū)) .子程序 _獲取歸屬地按鈕_被單擊 歸屬地編輯框.內(nèi)容 ＝ 取IP歸屬地_百度API (到文本 (IP地址編輯框.內(nèi)容))
運(yùn)行結(jié)果：
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了，希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
今天小編就為大家分享一篇關(guān)于易語(yǔ)言改變進(jìn)度條的方向，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
在本篇內(nèi)容里小編給大家分享了關(guān)于易語(yǔ)言編寫(xiě)俠盜獵車作弊器教程和知識(shí)點(diǎn)，對(duì)此有興趣的朋友們學(xué)習(xí)下。2019-01-01
易語(yǔ)言程序編譯腳本錯(cuò)誤的問(wèn)題解決辦法
在本篇文章中小編給大家分享了關(guān)于易語(yǔ)言程序編譯腳本錯(cuò)誤的問(wèn)題解決辦法，對(duì)此有興趣的朋友們可以學(xué)習(xí)下。2019-01-01
在本篇內(nèi)容中小編為大家分享了關(guān)于易語(yǔ)言簡(jiǎn)單超文本框組件怎么使用的知識(shí)點(diǎn)，需要的朋友們可以學(xué)習(xí)下。2019-01-01
今天小編就為大家分享一篇關(guān)于易語(yǔ)言使用office工具支持庫(kù)中的宏命令，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-10-10
在本文里給大家介紹的是關(guān)于易語(yǔ)言修改IE瀏覽器主頁(yè)方法內(nèi)容，需要的可以測(cè)試下。2018-12-12
易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
今天小編就為大家分享一篇關(guān)于易語(yǔ)言單擊按鈕后向編輯框中加入指定文本的方法，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
易語(yǔ)言超級(jí)列表框?qū)隩XT內(nèi)容的方法
在本篇文章里小編給大家整理的是關(guān)于易語(yǔ)言超級(jí)列表框?qū)隩XT內(nèi)容的方法，需要的朋友們可以學(xué)習(xí)參考下。2020-02-02
易語(yǔ)言到文本命令將其它數(shù)據(jù)類型轉(zhuǎn)換為文本型
今天小編就為大家分享一篇關(guān)于易語(yǔ)言到文本命令將其它數(shù)據(jù)類型轉(zhuǎn)換為文本型，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11