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.6, 4.5, 4, 3.5, 3.0, 2.0, 1.1

.NET Framework Client Profile

Supported in: 4, 3.5 SP1

XNA Framework

Supported in: 3.0, 2.0, 1.0
Show:
© 2015 Microsoft