您好,登錄后才能下訂單哦!
今天就跟大家聊聊有關VBS中怎么獲取重定向的URL,可能很多人都不太了解,為了讓大家更加了解,小編給大家總結了以下內容,希望大家根據這篇文章可以有所收獲。
訪問了一下他所謂的aaa.com,發現是HTTP 302重定向
HTTP/1.1 302 Moved Temporarily
Server: nginx/0.8.53
Date: Fri, 08 Apr 2011 15:49:25 GMT
Content-Type: text/html;charset=utf-8
Transfer-Encoding: chunked
Connection: keep-alive
X-Powered-By: PHP/5.2.15
Location: http://tuan.sohu.com/beijing/life/
為了測試方便,我寫了一個302.php,重定向到小顧de雜記:
<?php header('Location: http://ihipop.info/'); ?>
先用XMLHTTP試試:
Dim http Set http = CreateObject("Msxml2.ServerXMLHTTP") http.open "GET", "http://demon.tw/test/302.php", False http.send WScript.Echo http.responseText
XMLHTTP組件在處理包含Location頭的302消息時太智能,直接給跳轉到Location指定的頁面了。
XMLHTTP不行,我們還有WinHttp.WinHttpRequest.5.1,該組件的Option屬性的第六個索引EnableRedirects就是指示是否自動跳轉:
Dim WinHttp Set WinHttp = CreateObject("WinHttp.WinHttpRequest.5.1") WinHttp.Open "GET", "http://demon.tw/test/302.php", False WinHttp.Option(6) = False WinHttp.Send WScript.Echo WinHttp.GetResponseHeader("Location")
看完上述內容,你們對VBS中怎么獲取重定向的URL有進一步的了解嗎?如果還想了解更多知識或者相關內容,請關注億速云行業資訊頻道,感謝大家的支持。
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。