易語(yǔ)言自動(dòng)識(shí)別快遞公司查件免驗(yàn)證碼的代碼
常量數(shù)據(jù)表
.版本 2 .常量 快遞單號(hào)前, "<文本長(zhǎng)度: 13>", , [{"comCode":" .常量 快遞單號(hào)后, "<文本長(zhǎng)度: 9>", , ","id":""
快遞查詢(xún)自動(dòng)識(shí)別快遞公司無(wú)驗(yàn)證碼
此功能需要加載精易模塊5.6
.版本 2 .程序集 窗口程序集_啟動(dòng)窗口 .子程序 __啟動(dòng)窗口_創(chuàng)建完畢 .子程序 _查詢(xún)按鈕_被單擊 .局部變量 提交網(wǎng)址, 文本型 .局部變量 返回?cái)?shù)據(jù), 文本型 .局部變量 快遞單號(hào), 文本型 .局部變量 數(shù)據(jù), 文本型 .局部變量 i, 整數(shù)型 .局部變量 json, 類(lèi)_json 快遞信息編輯框.內(nèi)容 = “” 快遞狀態(tài)標(biāo)簽.標(biāo)題 = “” 提交網(wǎng)址 = “http://www.kuaidi100.com/autonumber/auto?num=” + 快遞編號(hào)編輯框.內(nèi)容 返回?cái)?shù)據(jù) = 編碼_utf8到gb2312 (網(wǎng)頁(yè)_訪(fǎng)問(wèn)S (提交網(wǎng)址, , )) 快遞單號(hào) = 文本_取出中間文本 (返回?cái)?shù)據(jù), #快遞單號(hào)前, #快遞單號(hào)后) 數(shù)據(jù) = 編碼_utf8到gb2312 (網(wǎng)頁(yè)_訪(fǎng)問(wèn)S (“http://www.kuaidi100.com/query?type=” + 快遞單號(hào) + “&postid=” + 快遞編號(hào)編輯框.內(nèi)容)) json.解析 (數(shù)據(jù)) .判斷開(kāi)始 (json.成員數(shù) (“data”) = 0) 快遞狀態(tài)標(biāo)簽.標(biāo)題 = “抱歉,暫無(wú)查詢(xún)記錄” .默認(rèn) 快遞狀態(tài)標(biāo)簽.標(biāo)題 = json.取通用屬性 (“data[0].context”, ) .計(jì)次循環(huán)首 (json.成員數(shù) (“data”), i) 系統(tǒng)_處理事件 () 快遞信息編輯框.加入文本 (json.取通用屬性 (“data[” + 到文本 (i - 1) + “].time”, ) + #換行符) 快遞信息編輯框.加入文本 (json.取通用屬性 (“data[” + 到文本 (i - 1) + “].context”, ) + #換行符) 快遞信息編輯框.加入文本 (json.取通用屬性 (“data[” + 到文本 (i - 1) + “].location”, ) + #換行符) 快遞信息編輯框.加入文本 (“*********************************************” + #換行符) .計(jì)次循環(huán)尾 () .判斷結(jié)束
運(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ǔ)言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言調(diào)用墨跡天氣實(shí)現(xiàn)自動(dòng)定位獲取天氣情況的代碼,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言制作編輯框輸入的字符以星號(hào)拼出的小程序
今天小編就為大家分享一篇關(guān)于易語(yǔ)言制作編輯框輸入的字符以星號(hào)拼出的小程序,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言保存文件時(shí)通用對(duì)話(huà)框給該文件加上指定的后綴名
今天小編就為大家分享一篇關(guān)于易語(yǔ)言保存文件時(shí)通用對(duì)話(huà)框給該文件加上指定的后綴名,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言關(guān)于變量的知識(shí)點(diǎn)
在本篇文章里小編給大家分享的是關(guān)于易語(yǔ)言關(guān)于變量的知識(shí)點(diǎn)內(nèi)容,有興趣的朋友們可以參考下。2020-03-03易語(yǔ)言在畫(huà)板中畫(huà)一個(gè)填充矩形的方法
今天小編就為大家分享一篇關(guān)于易語(yǔ)言在畫(huà)板中畫(huà)一個(gè)填充矩形的方法,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言中的命令及操作符知識(shí)點(diǎn)總結(jié)
在本篇文章里小編給各位整理的是關(guān)于易語(yǔ)言中的命令及操作符知識(shí)點(diǎn)總結(jié)內(nèi)容,有需要的朋友們可以參考下。2020-03-03