前幾天有個(gè)喜歡海淘的朋友就問(wèn)我，能不能幫他制作運(yùn)單查詢軟件，我問(wèn)她想干嘛？她就說(shuō)她經(jīng)常在海外網(wǎng)站買東西，用的一直是微轉(zhuǎn)運(yùn)國(guó)際速遞。所以她每次查詢運(yùn)單都要一次打開瀏覽器又一次關(guān)閉瀏覽器，十分繁瑣。就問(wèn)問(wèn)我這個(gè)老同學(xué)能都幫她制作個(gè)微轉(zhuǎn)運(yùn)國(guó)際速遞運(yùn)單查詢軟件，唉，看在老同學(xué)的面上我就同意了。之后我開始微轉(zhuǎn)運(yùn)國(guó)際速遞運(yùn)單查詢，我是個(gè)剛剛學(xué)習(xí)易語(yǔ)言的菜鳥，聽說(shuō)易語(yǔ)言是小學(xué)生玩的東西？那我是不是瞬間也成為了小學(xué)生啊。好了，不扯了，開始正文，由于本人技術(shù)有限，根據(jù)自己的思路編寫的微轉(zhuǎn)運(yùn)國(guó)際轉(zhuǎn)運(yùn)運(yùn)單查詢。

創(chuàng)新互聯(lián)公司專注于企業(yè)營(yíng)銷型網(wǎng)站建設(shè)、網(wǎng)站重做改版、共青城網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、H5場(chǎng)景定制、電子商務(wù)商城網(wǎng)站建設(shè)、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)營(yíng)銷網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁(yè)設(shè)計(jì)等建站業(yè)務(wù)，價(jià)格優(yōu)惠性價(jià)比高，為共青城等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。

 1、打開微轉(zhuǎn)運(yùn)國(guó)際速遞官網(wǎng)

在精易助手里輸入微轉(zhuǎn)運(yùn)網(wǎng)站www.wzhuanyun.com，來(lái)抓取運(yùn)單查詢時(shí)的post包。

  

成功抓取微轉(zhuǎn)運(yùn)國(guó)際速遞post包，那我來(lái)分析分析。

提交地址：
提交數(shù)據(jù)：truck_no=WZ123456789 （運(yùn)單單號(hào)是錯(cuò)誤的，保護(hù)隱私，這里只做演示）

看來(lái)我已經(jīng)抓取到post了，接下來(lái)就是動(dòng)刀！打開易語(yǔ)言程序！

2、用易語(yǔ)言開始編寫程序

先新建個(gè)程序，一個(gè)編輯框1和編輯框2和按鈕1.

雙擊查詢開始編寫代碼。新建個(gè)變量，取名微轉(zhuǎn)運(yùn)，文本型。

.版本 2

.子程序 _按鈕1_被單擊
.局部變量 微轉(zhuǎn)運(yùn), 文本型

微轉(zhuǎn)運(yùn) ＝ 到文本 (網(wǎng)絡(luò)_訪問(wèn)網(wǎng)頁(yè)_文本 (“http://www.wzhuanyun.com/shipment_process.htm”, “post”, “truck_no=” ＋ 編輯框1.內(nèi)容))
編輯框2.內(nèi)容 ＝ 編碼_URL解碼Utf8 (微轉(zhuǎn)運(yùn))

成功獲取頁(yè)面的運(yùn)單網(wǎng)頁(yè)時(shí)，那就開始截取網(wǎng)頁(yè)上的信息。

.版本 2

.子程序 文本_取中間文本_內(nèi)部, 文本型
.參數(shù) 欲取全文本, 文本型
.參數(shù) 左邊文本, 文本型
.參數(shù) 右邊文本, 文本型
.參數(shù) 跳過(guò)次數(shù), 整數(shù)型, 可空
.參數(shù) 起始位置, 整數(shù)型, 可空
.局部變量 左邊出現(xiàn)的位置, 整數(shù)型
.局部變量 右邊出現(xiàn)的位置, 整數(shù)型
.局部變量 文本長(zhǎng)度, 整數(shù)型

.如果真 (起始位置 ＞ 0)
    左邊出現(xiàn)的位置 ＝ 尋找文本 (欲取全文本, 左邊文本, 起始位置, 真)
.如果真結(jié)束
.計(jì)次循環(huán)首 (跳過(guò)次數(shù), )
    左邊出現(xiàn)的位置 ＝ 尋找文本 (欲取全文本, 左邊文本, 左邊出現(xiàn)的位置 ＋ 1, 真)
.計(jì)次循環(huán)尾 ()
左邊出現(xiàn)的位置 ＝ 尋找文本 (欲取全文本, 左邊文本, 左邊出現(xiàn)的位置 ＋ 1, 真)
右邊出現(xiàn)的位置 ＝ 尋找文本 (欲取全文本, 右邊文本, 左邊出現(xiàn)的位置 ＋ 1, 真)
.如果真 (左邊出現(xiàn)的位置 ＝ -1)
    返回 (“”)
.如果真結(jié)束
.如果真 (左邊出現(xiàn)的位置 ＝ -1 或 右邊出現(xiàn)的位置 ＝ -1)
    返回 (“”)
.如果真結(jié)束
文本長(zhǎng)度 ＝ 取文本長(zhǎng)度 (左邊文本)
返回 (取文本中間 (欲取全文本, 左邊出現(xiàn)的位置 ＋ 文本長(zhǎng)度, 右邊出現(xiàn)的位置 － 左邊出現(xiàn)的位置 － 文本長(zhǎng)度))

這里已經(jīng)截取到網(wǎng)頁(yè)內(nèi)容，

.版本 2

編輯框4.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “收貨人：”, “</div>”, , )
編輯框3.內(nèi)容 ＝ 文本_取中間文本 (編輯框4.內(nèi)容, “>”, “</font>”, , )
' 收貨人
編輯框5.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “step-txt liucheng_txt1”, “step-txt liucheng_txt2”, , )
編輯框7.內(nèi)容 ＝ 文本_取中間文本 (編輯框5.內(nèi)容, “blue_font”, “red_font”, , )
編輯框8.內(nèi)容 ＝ 文本_取中間文本 (編輯框7.內(nèi)容, “>”, “<”, , )
' 時(shí)間1
編輯框6.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “red_font”, “</div>”, , )
編輯框9.內(nèi)容 ＝ 文本_取中間文本 (編輯框6.內(nèi)容, “>”, “</font>”, , )
編輯框10.內(nèi)容 ＝ 文本_取中間文本 (編輯框5.內(nèi)容, “操作人”, “iv>”, , )
編輯框11.內(nèi)容 ＝ “已打包”
編輯框12.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “step-txt liucheng_txt2”, “step-txt liucheng_txt3”, , )
編輯框13.內(nèi)容 ＝ 文本_取中間文本 (編輯框12.內(nèi)容, “blue_font”, “font>”, , )
編輯框14.內(nèi)容 ＝ 文本_取中間文本 (編輯框13.內(nèi)容, “>”, “<”, , )
' 時(shí)間2
編輯框15.內(nèi)容 ＝ 文本_取中間文本 (編輯框12.內(nèi)容, “red_font”, “</div>”, , )
編輯框16.內(nèi)容 ＝ 文本_取中間文本 (編輯框15.內(nèi)容, “>”, “<”, , )
編輯框17.內(nèi)容 ＝ “已發(fā)貨”
編輯框18.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “step-txt liucheng_txt3”, “step-txt liucheng_txt4”, , )
編輯框19.內(nèi)容 ＝ 文本_取中間文本 (編輯框18.內(nèi)容, “blue_font”, “font”, , )
編輯框20.內(nèi)容 ＝ 文本_取中間文本 (編輯框19.內(nèi)容, “>”, “<”, , )
編輯框21.內(nèi)容 ＝ 文本_取中間文本 (編輯框18.內(nèi)容, “red_font”, “</div>”, , )
編輯框22.內(nèi)容 ＝ 文本_取中間文本 (編輯框21.內(nèi)容, “>”, “<”, , )
' 時(shí)間3
編輯框23.內(nèi)容 ＝ 文本_取中間文本 (編輯框2.內(nèi)容, “step-txt liucheng_txt4”, “step-txt liucheng_txt5”, , )
編輯框24.內(nèi)容 ＝ 文本_取中間文本 (編輯框23.內(nèi)容, “blue_font”, “font>”, , )
編輯框25.內(nèi)容 ＝ 文本_取中間文本 (編輯框24.內(nèi)容, “>”, “<”, , )

以上是一個(gè)個(gè)截取、不要說(shuō)辛苦

基本效果就是以上效果，但是我并沒有完成。最終我那位同學(xué)竟然說(shuō)我這個(gè)還不如打開網(wǎng)頁(yè)查詢，我就說(shuō)當(dāng)你打開網(wǎng)頁(yè)加載頁(yè)面的時(shí)候，我已經(jīng)獲取post的了，好了以上就是沒事練練手，熟悉一下易語(yǔ)言截取文本的練習(xí)。

另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)scvps.cn，海內(nèi)外云服務(wù)器15元起步，三天無(wú)理由+7*72小時(shí)售后在線，公司持有idc許可證，提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國(guó)服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案，具有“安全穩(wěn)定、簡(jiǎn)單易用、服務(wù)可用性高、性價(jià)比高”等特點(diǎn)與優(yōu)勢(shì)，專為企業(yè)上云打造定制，能夠滿足用戶豐富、多元化的應(yīng)用場(chǎng)景需求。

當(dāng)前名稱：如何用易語(yǔ)言制作微轉(zhuǎn)運(yùn)國(guó)際速遞運(yùn)單查詢工具-創(chuàng)新互聯(lián)
標(biāo)題URL：http://www.chinadenli.net/article28/cccgcp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供服務(wù)器托管、靜態(tài)網(wǎng)站、小程序開發(fā)、網(wǎng)站建設(shè)、動(dòng)態(tài)網(wǎng)站、域名注冊(cè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)