Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
Export (0) Print
Expand All

HttpListenerResponse.ContentEncoding Property

Gets or sets the Encoding for this response's OutputStream.

Namespace:  System.Net
Assembly:  System (in System.dll)

'Declaration
Public Property ContentEncoding As Encoding
'Usage
Dim instance As HttpListenerResponse 
Dim value As Encoding 

value = instance.ContentEncoding

instance.ContentEncoding = value

Property Value

Type: System.Text.Encoding
An Encoding object suitable for use with the data in the OutputStream property, or Nothing if no encoding is specified.

An Encoding object can be used to convert byte sequences into character sets (code pages) and characters into byte sequences.

The following code example demonstrates using this property.

Private Shared message403 As String 
Private Shared preMade403Response As HttpListenerResponse
Private Shared Sub SendBadCertificateResponse(ByVal response As HttpListenerResponse)

    If preMade403Response Is Nothing Then 
        ' Set up an authentication error response template.
        response.StatusCode = Cint(HttpStatusCode.Forbidden)
        response.StatusDescription = "403 Forbidden"
        response.ProtocolVersion = New Version("1.1")
        response.SendChunked = False 
    Else
        response.CopyFrom(preMade403Response) 
    End If 

    ' The response body cannot be saved in the template. 
    Dim message As New StringBuilder()
    message.Append("<HTML><BODY>")
    message.Append("<p> Error message 403: Access is denied due to a missing or invalid client certificate.</p>")
    message.Append("</BODY></HTML>")
    message403 = message.ToString()

    ' Turn the error message into a byte array using the  
    ' encoding from the response when present. 
    Dim encoding As System.Text.Encoding = response.ContentEncoding
    If encoding Is Nothing Then
        encoding = System.Text.Encoding.UTF8
        response.ContentEncoding = encoding
    End If 

    Dim buffer() As Byte = encoding.GetBytes(message403)
    response.ContentLength64 = buffer.Length
    ' Write the error message. 
    Dim stream As System.IO.Stream = response.OutputStream
    stream.Write(buffer, 0, buffer.Length)
    ' Send the response.
    response.Close()
End Sub

Windows 7, Windows Vista, Windows XP SP2, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP Starter Edition, Windows Server 2008 R2, Windows Server 2008, Windows Server 2003, Windows Server 2000 SP4, Windows Millennium Edition, Windows 98

The .NET Framework and .NET Compact Framework do not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.

.NET Framework

Supported in: 3.5, 3.0, 2.0

Community Additions

ADD
Show:
© 2015 Microsoft