快捷導(dǎo)航

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

更新時(shí)間：2018年11月30日 10:13:30 作者：易語(yǔ)言源碼教程

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

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

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

.版本 2
.支持庫(kù) EThread
.程序集 窗口程序集_啟動(dòng)窗口
.子程序 test
商品地址編輯框.內(nèi)容 ＝ GetRealUrl (短鏈接編輯框.內(nèi)容)
.子程序 GetRealUrl, 文本型
.參數(shù) shortUrl, 文本型
.局部變量 rurl, 文本型
.局部變量 referer, 文本型
.局部變量 laststr, 文本型
httpGet (shortUrl, , rurl)
httpGet (rurl, , referer)
laststr ＝ 文本_取右邊 (referer, “ref”) ' 取文本右邊 (referer, 取文本長(zhǎng)度 (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)頁(yè)_訪問_對(duì)象 (url, , , , , header, reheader, , 真, , , , , , , )
' 下面兩行是取location的值的
index ＝ 尋找文本 (reheader, “ation:”, , 假)
rurl ＝ 取文本中間 (reheader, index ＋ 7, 尋找文本 (reheader, #換行符, index, 假) － index － 7)
.子程序 _轉(zhuǎn)換按鈕_被單擊
啟動(dòng)線程 (&test, , )

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