在请求后如何将重定向的URL作为字符串重定向
-
25-10-2019 - |
题
例如,在任何tinyurl/ajdeijad链接(这是假的)上,将思想重定向到另一个URL
这是我的代码:
Dim request1 As HttpWebRequest = DirectCast(HttpWebRequest.Create(urlvimeohd), HttpWebRequest)
request1.UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/535.1 (KHTML, like Gecko) Chrome/13.0.782.112 Safari/535.1"
request1.MaximumAutomaticRedirections = 1
request1.AllowAutoRedirect = True
您如何检索响应的URL(它重定向!)
解决方案 2
简单 - 只要得到回应的回报!
http://msdn.microsoft.com/en-us/library/system.net.webresponse.responseuri.aspx
dim myresponse as request1.getresponse()
dim x as string = myresponse.ResponseURI
其他提示
我知道重定向到哪个URL的唯一方法是提出请求和阅读响应。
request1.GetResponse().Headers("Location")
仅供参考:您应该检查提琴手。这是一个免费的应用程序,可让您视觉检查浏览器的请求和响应。您可以将其链接复制到浏览器中,并查看服务器所说的内容。然后,您将知道要检查哪个标题以获取所需的信息。
希望有帮助。
尝试这个,
Dim req As HttpWebRequest = DirectCast(HttpWebRequest.Create("http://tinyurl/ajdeijad"), HttpWebRequest)
Dim response As HttpWebResponse
Dim resUri As String
response = req.GetResponse
resUri = response.ResponseUri.AbsoluteUri
MsgBox(resUri)
这将返回重定向的URL。
不隶属于 StackOverflow