WebResponse.ResponseUri Property gets the URI of the Internet resource that actually responded to the request.
Imports System.IO
Imports System.Net
Imports System.Text
Public Class MainClass
Shared Sub Main()
Dim url As String = "http://google.com"
Dim ourUri As New Uri(url)
Dim myWebRequest As WebRequest = WebRequest.Create(url)
Dim myWebResponse As WebResponse = myWebRequest.GetResponse()
If ourUri.Equals(myWebResponse.ResponseUri) Then
Console.WriteLine("not redirected")
Else
Console.WriteLine("redirected ")
Console.WriteLine(myWebResponse.ResponseUri)
End If
myWebResponse.Close()
End Sub
End Class