前幾天有個喜歡海淘的朋友就問我,能不能幫他制作運單查詢軟件,我問她想干嘛?她就說她經常在海外網站買東西,用的一直是微轉運國際速遞。所以她每次查詢運單都要一次打開瀏覽器又一次關閉瀏覽器,十分繁瑣。就問問我這個老同學能都幫她制作個微轉運國際速遞運單查詢軟件,唉,看在老同學的面上我就同意了。之后我開始微轉運國際速遞運單查詢,我是個剛剛學習易語言的菜鳥,聽說易語言是小學生玩的東西?那我是不是瞬間也成為了小學生啊。好了,不扯了,開始正文,由于本人技術有限,根據自己的思路編寫的微轉運國際轉運運單查詢。
創(chuàng)新互聯(lián)公司專注于企業(yè)營銷型網站建設、網站重做改版、共青城網站定制設計、自適應品牌網站建設、H5場景定制、電子商務商城網站建設、集團公司官網建設、外貿營銷網站建設、高端網站制作、響應式網頁設計等建站業(yè)務,價格優(yōu)惠性價比高,為共青城等各大城市提供網站開發(fā)制作服務。1、打開微轉運國際速遞官網
在精易助手里輸入微轉運網站www.wzhuanyun.com,來抓取運單查詢時的post包。
成功抓取微轉運國際速遞post包,那我來分析分析。
提交地址: 提交數據:truck_no=WZ123456789 (運單單號是錯誤的,保護隱私,這里只做演示)
看來我已經抓取到post了,接下來就是動刀!打開易語言程序!
2、用易語言開始編寫程序
先新建個程序,一個編輯框1和編輯框2和按鈕1.
雙擊查詢開始編寫代碼。新建個變量,取名微轉運,文本型。
.版本 2 .子程序 _按鈕1_被單擊 .局部變量 微轉運, 文本型 微轉運 = 到文本 (網絡_訪問網頁_文本 (“http://www.wzhuanyun.com/shipment_process.htm”, “post”, “truck_no=” + 編輯框1.內容)) 編輯框2.內容 = 編碼_URL解碼Utf8 (微轉運)
成功獲取頁面的運單網頁時,那就開始截取網頁上的信息。
.版本 2 .子程序 文本_取中間文本_內部, 文本型 .參數 欲取全文本, 文本型 .參數 左邊文本, 文本型 .參數 右邊文本, 文本型 .參數 跳過次數, 整數型, 可空 .參數 起始位置, 整數型, 可空 .局部變量 左邊出現的位置, 整數型 .局部變量 右邊出現的位置, 整數型 .局部變量 文本長度, 整數型 .如果真 (起始位置 > 0) 左邊出現的位置 = 尋找文本 (欲取全文本, 左邊文本, 起始位置, 真) .如果真結束 .計次循環(huán)首 (跳過次數, ) 左邊出現的位置 = 尋找文本 (欲取全文本, 左邊文本, 左邊出現的位置 + 1, 真) .計次循環(huán)尾 () 左邊出現的位置 = 尋找文本 (欲取全文本, 左邊文本, 左邊出現的位置 + 1, 真) 右邊出現的位置 = 尋找文本 (欲取全文本, 右邊文本, 左邊出現的位置 + 1, 真) .如果真 (左邊出現的位置 = -1) 返回 (“”) .如果真結束 .如果真 (左邊出現的位置 = -1 或 右邊出現的位置 = -1) 返回 (“”) .如果真結束 文本長度 = 取文本長度 (左邊文本) 返回 (取文本中間 (欲取全文本, 左邊出現的位置 + 文本長度, 右邊出現的位置 - 左邊出現的位置 - 文本長度))
這里已經截取到網頁內容,
.版本 2 編輯框4.內容 = 文本_取中間文本 (編輯框2.內容, “收貨人:”, “</div>”, , ) 編輯框3.內容 = 文本_取中間文本 (編輯框4.內容, “>”, “</font>”, , ) ' 收貨人 編輯框5.內容 = 文本_取中間文本 (編輯框2.內容, “step-txt liucheng_txt1”, “step-txt liucheng_txt2”, , ) 編輯框7.內容 = 文本_取中間文本 (編輯框5.內容, “blue_font”, “red_font”, , ) 編輯框8.內容 = 文本_取中間文本 (編輯框7.內容, “>”, “<”, , ) ' 時間1 編輯框6.內容 = 文本_取中間文本 (編輯框2.內容, “red_font”, “</div>”, , ) 編輯框9.內容 = 文本_取中間文本 (編輯框6.內容, “>”, “</font>”, , ) 編輯框10.內容 = 文本_取中間文本 (編輯框5.內容, “操作人”, “iv>”, , ) 編輯框11.內容 = “已打包” 編輯框12.內容 = 文本_取中間文本 (編輯框2.內容, “step-txt liucheng_txt2”, “step-txt liucheng_txt3”, , ) 編輯框13.內容 = 文本_取中間文本 (編輯框12.內容, “blue_font”, “font>”, , ) 編輯框14.內容 = 文本_取中間文本 (編輯框13.內容, “>”, “<”, , ) ' 時間2 編輯框15.內容 = 文本_取中間文本 (編輯框12.內容, “red_font”, “</div>”, , ) 編輯框16.內容 = 文本_取中間文本 (編輯框15.內容, “>”, “<”, , ) 編輯框17.內容 = “已發(fā)貨” 編輯框18.內容 = 文本_取中間文本 (編輯框2.內容, “step-txt liucheng_txt3”, “step-txt liucheng_txt4”, , ) 編輯框19.內容 = 文本_取中間文本 (編輯框18.內容, “blue_font”, “font”, , ) 編輯框20.內容 = 文本_取中間文本 (編輯框19.內容, “>”, “<”, , ) 編輯框21.內容 = 文本_取中間文本 (編輯框18.內容, “red_font”, “</div>”, , ) 編輯框22.內容 = 文本_取中間文本 (編輯框21.內容, “>”, “<”, , ) ' 時間3 編輯框23.內容 = 文本_取中間文本 (編輯框2.內容, “step-txt liucheng_txt4”, “step-txt liucheng_txt5”, , ) 編輯框24.內容 = 文本_取中間文本 (編輯框23.內容, “blue_font”, “font>”, , ) 編輯框25.內容 = 文本_取中間文本 (編輯框24.內容, “>”, “<”, , )
以上是一個個截取、不要說辛苦
基本效果就是以上效果,但是我并沒有完成。最終我那位同學竟然說我這個還不如打開網頁查詢,我就說當你打開網頁加載頁面的時候,我已經獲取post的了,好了以上就是沒事練練手,熟悉一下易語言截取文本的練習。
另外有需要云服務器可以了解下創(chuàng)新互聯(lián)scvps.cn,海內外云服務器15元起步,三天無理由+7*72小時售后在線,公司持有idc許可證,提供“云服務器、裸金屬服務器、高防服務器、香港服務器、美國服務器、虛擬主機、免備案服務器”等云主機租用服務以及企業(yè)上云的綜合解決方案,具有“安全穩(wěn)定、簡單易用、服務可用性高、性價比高”等特點與優(yōu)勢,專為企業(yè)上云打造定制,能夠滿足用戶豐富、多元化的應用場景需求。
當前名稱:如何用易語言制作微轉運國際速遞運單查詢工具-創(chuàng)新互聯(lián)
標題URL:http://vcdvsql.cn/article28/cccgcp.html
成都網站建設公司_創(chuàng)新互聯(lián),為您提供服務器托管、靜態(tài)網站、小程序開發(fā)、網站建設、動態(tài)網站、域名注冊
聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)