溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
淘寶客短鏈接轉換成商品地址的代碼
此功能需要加載精易模塊5.6
.版本 2 .支持庫 EThread .程序集 窗口程序集_啟動窗口 .子程序 test 商品地址編輯框.內容 ＝ GetRealUrl (短鏈接編輯框.內容) .子程序 GetRealUrl, 文本型 .參數 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 .參數 url, 文本型 .參數 header, 文本型, 可空 .參數 rurl, 文本型, 參考 可空 .局部變量 reheader, 文本型 .局部變量 index, 整數型 網頁_訪問_對象 (url, , , , , header, reheader, , 真, , , , , , , ) ' 下面兩行是取location的值的 index ＝ 尋找文本 (reheader, “ation:”, , 假) rurl ＝ 取文本中間 (reheader, index ＋ 7, 尋找文本 (reheader, #換行符, index, 假) － index － 7) .子程序 _轉換按鈕_被單擊 啟動線程 (&test, , )
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對億速云的支持。如果你想了解更多相關內容請查看下面相關鏈接
免責聲明：本站發(fā)布的內容（圖片、視頻和文字）以原創(chuàng)、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯(lián)系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
