Export (0) Print
Expand All

TextWriterTraceListener Constructor (TextWriter, String)

Initializes a new instance of the TextWriterTraceListener class with the specified name, using the specified writer as recipient of the tracing or debugging output.

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

'Declaration
Public Sub New ( _
	writer As TextWriter, _
	name As String _
)

Parameters

writer
Type: System.IO.TextWriter

A TextWriter that receives the output from the TextWriterTraceListener.

name
Type: System.String

The name of the new instance.

ExceptionCondition
ArgumentNullException

The writer is Nothing.

The following code example creates a TextWriterTraceListener using the TextWriterTraceListener(TextWriter, String) constructor. The example creates a StreamWriter, then references the StreamWriter when it creates the TextWriterTraceListener, which it then adds to the TraceListenerCollection. The example writes two messages to this TextWriterTraceListener, then writes a message to all TraceListener objects in the TraceListenerCollection. Finally, it flushes and closes the TextWriterTraceListener.

Imports System
Imports System.Diagnostics
Imports System.IO
Imports Microsoft.VisualBasic

Module TWTLConWriterNameMod

    Const LISTENER_NAME As String = "myWriterListener" 

    ' args(0) is the specification of the trace log file. 
    Sub Main(ByVal args() As String)

        ' Verify that a parameter was entered. 
        If args.Length = 0 Then
            Console.WriteLine("Enter a trace file specification.")

        Else 
            ' Create a StreamWriter object that supports appending. 
            Dim traceWriter As StreamWriter
            Try
                traceWriter = New StreamWriter(args(0), True)
            Catch ex As Exception
                Console.WriteLine( _
                    "Error creating StreamWriter for trace file ""{0}"":" & _
                    vbCrLf & "{1}", args(0), ex.Message)
                Return 
            End Try 

            ' Create a TextWriterTraceListener that takes a StreamWriter. 
            Dim textListener As TextWriterTraceListener
            textListener = _
                New TextWriterTraceListener(traceWriter, LISTENER_NAME)
            Trace.Listeners.Add(textListener)

            ' Write these messages only to this TextWriterTraceListener.
            textListener.WriteLine( _
                "This is trace listener named """ & textListener.Name & """")
            textListener.WriteLine( _
                "Trace written through a stream to: " & _
                vbCrLf & "    """ & args(0) & """")

            ' Write a message to all trace listeners.
            Trace.WriteLine(String.Format( _
                "This trace message written {0} to all listeners.", Now))

            ' Flush and close the output.
            Trace.Flush()
            textListener.Flush()
            textListener.Close()
        End If 
    End Sub 
End Module

.NET Framework

Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0

.NET Framework Client Profile

Supported in: 4, 3.5 SP1

Windows 8.1, Windows Server 2012 R2, Windows 8, Windows Server 2012, Windows 7, Windows Vista SP2, Windows Server 2008 (Server Core Role not supported), Windows Server 2008 R2 (Server Core Role supported with SP1 or later; Itanium not supported)

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

Show:
© 2014 Microsoft