While 1 'Fals Datei geöffnet ist
  Try
    nol = ReadAllLines(Config.ccc).Length
    Exit While
  Catch ex As Exception
    Console.WriteLine("Datei konnte nicht geöffnet werden! Starte neuen" & _
      "Versuch")
    Thread.Sleep(100)
  End Try
End While