要求

Question

例如在任何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（它重定向！）

Answer 1

简单 - 只需获得响应的reponseuri！

http://msdn.microsoft.com/en-us/library/system.net.webresponse.responseuri.aspx

dim myresponse as request1.getresponse() 
dim x as string = myresponse.ResponseURI 

Answer 2

我知道找到它重定向到哪个URL的唯一方法是通过发出请求和读取响应。

request1.GetResponse().Headers("Location") 

供参考：你应该检查出提琴手。这是一个免费的应用程序，可以让你直观地检查浏览器提出的请求和响应。您可以复制粘贴到您的浏览器中的粘贴，并查看服务器返回的内容。然后你会知道哪个Header检查你想要的信息。

希望有所帮助。

Answer 3

试试这个，

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。