易語(yǔ)言調(diào)用百度API獲取IP歸屬地的代碼
常量據(jù)表
.版本 2
.常量 查ip地址, "<文本長(zhǎng)度: 17>", , {"code":0,"data":
調(diào)用百度api獲取ip歸屬地的代碼
此功能需要加載精易模塊5.6
.版本 2 .程序集 窗口程序集_啟動(dòng)窗口 .子程序 取IP歸屬地_百度API, 文本型, 公開 .參數(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)文章
易語(yǔ)言程序編譯腳本錯(cuò)誤的問(wèn)題解決辦法
在本篇文章中小編給大家分享了關(guān)于易語(yǔ)言程序編譯腳本錯(cuò)誤的問(wèn)題解決辦法,對(duì)此有興趣的朋友們可以學(xué)習(xí)下。2019-01-01
易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用whois實(shí)現(xiàn)域名批量查詢與注冊(cè)的代碼,小編覺得內(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)換為文本型,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11

