快捷導(dǎo)航

易語言解析淘寶客短鏈接轉(zhuǎn)換成商品真實鏈接的代碼

更新時間：2018年11月30日 10:13:30 作者：易語言源碼教程

今天小編就為大家分享一篇關(guān)于易語言解析淘寶客短鏈接轉(zhuǎn)換成商品真實鏈接的代碼，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧

淘寶客短鏈接轉(zhuǎn)換成商品地址的代碼

此功能需要加載精易模塊5.6

.版本 2
.支持庫 EThread
.程序集 窗口程序集_啟動窗口
.子程序 test
商品地址編輯框.內(nèi)容 ＝ GetRealUrl (短鏈接編輯框.內(nèi)容)
.子程序 GetRealUrl, 文本型
.參數(shù) shortUrl, 文本型
.局部變量 rurl, 文本型
.局部變量 referer, 文本型
.局部變量 laststr, 文本型
httpGet (shortUrl, , rurl)
httpGet (rurl, , referer)
laststr ＝ 文本_取右邊 (referer, “ref”) ' 取文本右邊 (referer, 取文本長度 (referer) － 尋找文本 (referer, 取文本右邊 (rurl, 8), , 假) － 7)
laststr ＝ 子文本替換 (laststr, “%26”, “&”, , , 真)
laststr ＝ 子文本替換 (laststr, “%25”, “%”, , , 真)
laststr ＝ 子文本替換 (laststr, “%3D”, “=”, , , 真)
httpGet (rurl ＋ “ref” ＋ laststr, “Referer:” ＋ referer, rurl)
返回 (取文本左邊 (rurl, 尋找文本 (rurl, “&”, , 假) － 1))
.子程序 httpGet
.參數(shù) url, 文本型
.參數(shù) header, 文本型, 可空
.參數(shù) rurl, 文本型, 參考 可空
.局部變量 reheader, 文本型
.局部變量 index, 整數(shù)型
網(wǎng)頁_訪問_對象 (url, , , , , header, reheader, , 真, , , , , , , )
' 下面兩行是取location的值的
index ＝ 尋找文本 (reheader, “ation:”, , 假)
rurl ＝ 取文本中間 (reheader, index ＋ 7, 尋找文本 (reheader, #換行符, index, 假) － index － 7)
.子程序 _轉(zhuǎn)換按鈕_被單擊
啟動線程 (&test, , )

運行結(jié)果：

總結(jié)

以上就是這篇文章的全部內(nèi)容了，希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值，謝謝大家對腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接

您可能感興趣的文章:

相關(guān)文章

易語言設(shè)定編輯框內(nèi)最多允許輸入多少字節(jié)的方法
今天小編就為大家分享一篇關(guān)于易語言設(shè)定編輯框內(nèi)最多允許輸入多少字節(jié)的方法，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-11-11
淺析易語言外部判斷程序超時防卡住問題
在本篇關(guān)于易語言的文章里給大家介紹了易語言外部判斷程序超時防卡住問題，有需要的朋友們學(xué)習(xí)一下。
2018-11-11
易語言更改畫板寫出文字的顏色
今天小編就為大家分享一篇關(guān)于易語言更改畫板寫出文字的顏色，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-11-11
易語言制作汽車油耗計算器的代碼
今天小編就為大家分享一篇關(guān)于易語言制作汽車油耗計算器的代碼，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-12-12
易語言賦值定義多維數(shù)組的代碼實例
今天小編就為大家分享一篇關(guān)于易語言賦值定義多維數(shù)組的代碼實例，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2019-02-02
易語言計次循環(huán)首命令使用講解
今天小編就為大家分享一篇關(guān)于易語言計次循環(huán)首命令使用講解，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-10-10
易語言部分重畫與取消重畫的使用方法
今天小編就為大家分享一篇關(guān)于易語言部分重畫與取消重畫的使用方法，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-11-11
一步一步跟我學(xué)易語言之變量的有效范圍
今天小編就為大家分享一篇關(guān)于一步一步跟我學(xué)易語言之變量的有效范圍，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-10-10
簡單的易語言多線程應(yīng)用實例
在本篇內(nèi)容里小編給大家分享了關(guān)于易語言簡單多線程應(yīng)用的相關(guān)實例內(nèi)容，有興趣的朋友們可以參考下。
2018-11-11
易語言判斷今天是星期幾的代碼實例
今天小編就為大家分享一篇關(guān)于易語言判斷今天是星期幾的代碼實例，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧
2018-11-11