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.java2s.com/index.htm?key=value")
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
If httpReq.Connection <> Nothing Then
Console.WriteLine("Connection: " & httpReq.Connection.ToString)
End If
If httpReq.ConnectionGroupName <> Nothing Then
Console.WriteLine("ConnectionGroupName: " & httpReq.ConnectionGroupName.ToString)
End If
If httpReq.ContentLength <> -1 Then
Console.WriteLine("ContentLength: " & httpReq.ContentLength.ToString)
End If
If httpReq.ContentType <> Nothing Then
Console.WriteLine("ContentType: " & httpReq.ContentType.ToString)
End If
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString())
End Try
End Sub
End Class