Condividi tramite


Procedura: aprire e accodare un file di log

Aggiornamento: novembre 2007

StreamWriter e StreamReader scrivono e leggono caratteri dai flussi. Nell'esempio di codice che segue viene aperto il file log.txt e vi vengono accodate informazioni. Nel caso non sia disponibile, il file verrà creato. Il contenuto del file viene quindi scritto nell'output standard, che ne consente la visualizzazione. Come alternativa a questo esempio sarebbe possibile archiviare le informazioni come stringa singola o matrice di stringa, e per ottenere la stessa funzionalità sarebbe possibile utilizzare il metodo WriteAllText o WriteAllLines.

Nota:

Per la creazione o la scrittura nei file di log, gli utenti di Visual Basic possono scegliere di utilizzare i metodi e le proprietà forniti dagli oggetti My.Application.Log o My.Computer.FileSystem. Per ulteriori informazioni, vedere Oggetto My.Application.Log e Oggetto My.Computer.FileSystem.

Esempio

Option Explicit On 
Option Strict On
Imports System
Imports System.IO
Imports Microsoft.VisualBasic
Class DirAppend
    Public Shared Sub Main()
        Using w As StreamWriter = File.AppendText("log.txt")
            Log("Test1", w)
            Log("Test2", w)
            ' Close the writer and underlying file.
            w.Close()
        End Using
        ' Open and read the file.
        Using r As StreamReader = File.OpenText("log.txt")
            DumpLog(r)
        End Using
    End Sub
    Public Shared Sub Log(ByVal logMessage As String, ByVal w As TextWriter)
        w.Write(ControlChars.CrLf & "Log Entry : ")
        w.WriteLine("{0} {1}", DateTime.Now.ToLongTimeString(), DateTime.Now.ToLongDateString())
        w.WriteLine("  :")
        w.WriteLine("  :{0}", logMessage)
        w.WriteLine("-------------------------------")
        ' Update the underlying file.
        w.Flush()
    End Sub
    Public Shared Sub DumpLog(ByVal r As StreamReader)
        ' While not at the end of the file, read and write lines.
        Dim line As String
        line = r.ReadLine()
        While Not line Is Nothing
            Console.WriteLine(line)
            line = r.ReadLine()
        End While
        r.Close()
    End Sub
End Class
using System;
using System.IO;
class DirAppend
{
    public static void Main(String[] args)
    {
        using (StreamWriter w = File.AppendText("log.txt"))
        {
            Log ("Test1", w);
            Log ("Test2", w);
            // Close the writer and underlying file.
            w.Close();
        }
        // Open and read the file.
        using (StreamReader r = File.OpenText("log.txt"))
        {
            DumpLog (r);
        }
    }
    public static void Log (String logMessage, TextWriter w)
    {
        w.Write("\r\nLog Entry : ");
        w.WriteLine("{0} {1}", DateTime.Now.ToLongTimeString(),
            DateTime.Now.ToLongDateString());
        w.WriteLine("  :");
        w.WriteLine("  :{0}", logMessage);
        w.WriteLine ("-------------------------------");
        // Update the underlying file.
        w.Flush(); 
    }
    public static void DumpLog (StreamReader r)
    {
        // While not at the end of the file, read and write lines.
        String line;
        while ((line=r.ReadLine())!=null)
        {
            Console.WriteLine(line);
        }
        r.Close();
    }
}

Vedere anche

Attività

Procedura: creare una visualizzazione directory

Procedura: leggere e scrivere su un file di dati appena creato

Procedura: leggere testo da un file

Procedura: scrivere testo su un file

Procedura: leggere caratteri da una stringa

Procedura: scrivere caratteri in una stringa

Concetti

I/O di file di base

Riferimenti

StreamWriter

StreamReader

File.AppendText

File.OpenText

StreamReader.ReadLine