'LogWriter schreibt LOG
        Dim FiStr As FileStream
        Dim StrWr As StreamWriter
        Try
            FiStr = New FileStream(datName, FileMode.Append)
            StrWr = New StreamWriter(FiStr)
            StrWr.WriteLine(DateTime.Now & "  -  " & MTxt)
        Catch ex As Exception
'Eine Fehlermeldung ausgeben
        Finally
            StrWr.Close()
 
        End Try

Gruss
VIVAX

}
}
}

1:0 für Visual Basic.NET