Mega Code Archive

 

Categories / VB.Net by API / System Net

 

WebRequest RequestUri

Imports System.Net Imports System.Net.Sockets Public Class Tester     Public Shared Sub Main         Dim httpReq As System.Net.HttpWebRequest              Try           Dim httpURL As New System.Uri("http://www.rntsoft.com/index.htm?key=value")                httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)                If httpReq.Referer <> Nothing Then             Console.WriteLine("Referer: " & httpReq.Referer.ToString)           End If                Console.WriteLine("RequestUri: " & httpReq.RequestUri.ToString)                If (httpReq.RequestUri.ToString() <> httpReq.Address.ToString()) Then             Console.WriteLine("URL has been changed.")           End If              Catch ex As Exception           Console.WriteLine(ex.StackTrace.ToString())         End Try     End Sub End Class