本文整理汇总了VB.NET中System.Net.HttpWebResponse.ProtocolVersion属性的典型用法代码示例。如果您正苦于以下问题：VB.NET HttpWebResponse.ProtocolVersion属性的具体用法？VB.NET HttpWebResponse.ProtocolVersion怎么用？VB.NET HttpWebResponse.ProtocolVersion使用的例子？那么, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.Net.HttpWebResponse的用法示例。
在下文中一共展示了HttpWebResponse.ProtocolVersion属性的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: Uri
Dim ourUri As New Uri(url)
' Creates an HttpWebRequest with the specified URL.
Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create(ourUri), HttpWebRequest)
myHttpWebRequest.ProtocolVersion = HttpVersion.Version10
' Sends the request and waits for the response.
Dim myHttpWebResponse As HttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)
'The ProtocolVersion property is used to ensure that only Http/1.0 responses are accepted.
If myHttpWebResponse.ProtocolVersion Is HttpVersion.Version10 Then
Console.WriteLine(ControlChars.NewLine + "The server responded with a version other than Http/1.0")
Else
If myHttpWebResponse.StatusCode = HttpStatusCode.OK Then
Console.WriteLine(ControlChars.NewLine + "Request sent using version HTTP/1.0. Successfully received response with version Http/1.0 ")
End If
End If
' Releases the resources of the response.
myHttpWebResponse.Close()示例2: Tester
' 导入命名空间
Imports System.Net
Imports System.Net.Sockets
Public Class Tester
Public Shared Sub Main
Dim httpReq As System.Net.HttpWebRequest
Dim httpResp As System.Net.HttpWebResponse
Try
Dim httpURL As New System.Uri("http://www.java2s.com")
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
Console.WriteLine("CharacterSet: " & httpResp.CharacterSet.ToString)
Console.WriteLine("ContentEncoding: " & httpResp.ContentEncoding.ToString)
Console.WriteLine("ContentLength: " & httpResp.ContentLength.ToString)
Console.WriteLine("ContentType: " & httpResp.ContentType.ToString)
Console.WriteLine("LastModified: " & httpResp.LastModified.ToString)
Console.WriteLine("Method: " & httpResp.Method.ToString)
Console.WriteLine("ProtocolVersion: " & httpResp.ProtocolVersion.ToString)
Console.WriteLine("ResponseUri: " & httpResp.ResponseUri.ToString)
Console.WriteLine("Server: " & httpResp.Server.ToString)
Console.WriteLine("StatusCode: " & httpResp.StatusCode.ToString)
Console.WriteLine("StatusDescription: " & httpResp.StatusDescription.ToString)
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString())
End Try
End Sub
End Class