本文整理汇总了VB.NET中System.Net.HttpWebResponse.CharacterSet属性的典型用法代码示例。如果您正苦于以下问题：VB.NET HttpWebResponse.CharacterSet属性的具体用法？VB.NET HttpWebResponse.CharacterSet怎么用？VB.NET HttpWebResponse.CharacterSet使用的例子？那么恭喜您, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.Net.HttpWebResponse的用法示例。
在下文中一共展示了HttpWebResponse.CharacterSet属性的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: CType
Try
Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
Dim myHttpWebResponse As HttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)
Console.WriteLine(("The encoding method used is: " + myHttpWebResponse.ContentEncoding))
Console.WriteLine(("The character set used is :" + myHttpWebResponse.CharacterSet))
Dim seperator As Char = "/"c
Dim contenttype As [String] = myHttpWebResponse.ContentType
' Retrieve 'text' if the content type is of 'text/html.
Dim maintype As [String] = contenttype.Substring(0, contenttype.IndexOf(seperator))
' Display only 'text' type.
If [String].Compare(maintype, "text") = 0 Then
Console.WriteLine(ControlChars.NewLine + " Content type is 'text'.")示例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