欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

易語(yǔ)言自動(dòng)識(shí)別快遞公司查件免驗(yàn)證碼的代碼

 更新時(shí)間:2018年12月03日 15:13:44   作者:易語(yǔ)言源碼教程  
今天小編就為大家分享一篇關(guān)于易語(yǔ)言自動(dòng)識(shí)別快遞公司查件免驗(yàn)證碼的代碼,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧

常量數(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)文章

最新評(píng)論