Dim swr As New StreamWriter("Err.log", true, System.Text.Default)
swr.WriteLine("Beliebiger Text")
swr.Close()

Dim FileName As String 
 
FileName = "Err.log"
If File.Exists(FileName) Then
    Dim swr As New StreamWriter(File.CreateText(FileName), true, _
      System.Text.Default)
Else
    Dim swr As New StreamWriter(FileName, true, System.Text.Default)
End If
swr.WriteLine("Beliebiger Text")     ' Hier kommt der Fehler 
swr.Close()

Murphy:
 1.) Nichts ist so leicht wie es aussieht!
 2.) Alles dauert länger als du denkst!
 3.) Alles, was schief gehen kann, geht schief!

Star

Murphy:
 1.) Nichts ist so leicht wie es aussieht!
 2.) Alles dauert l?nger als du denkst!
 3.) Alles, was schief gehen kann, geht schief!