Guten Abend
Ich stehe wieder vor einem Problem. Ich habe ein "Logbuch" das mir einige Log´s schreibt. Funktioniert auch.
Um das ganze etwas übersichtlicher zu gestallten, möchte ich die .txt in eine DataGridView Importieren.
Problem: Mein Logbuch.log sieht so aus:
das mit folgendem Code erstellt wird.
Mit diesem Code lese ich die Logbuch.log in die DataGridView
Problem ist, dass das einlesen nur funktioniert, wenn in den zwischräumen ein "|" ist. Also so:
Git es eine Möglichkeit, die log Datei so zu speichern, das es mir die zwischenräume mit einem "|" füllt?
Gruß und Danke
Gebhard
Ich stehe wieder vor einem Problem. Ich habe ein "Logbuch" das mir einige Log´s schreibt. Funktioniert auch.
Um das ganze etwas übersichtlicher zu gestallten, möchte ich die .txt in eine DataGridView Importieren.
Problem: Mein Logbuch.log sieht so aus:
DefaultSource Information 1 PRG-Feuchtmittelraum wurde gestartet, '20.06.2023 11:18:34'
das mit folgendem Code erstellt wird.
VB.NET-Quellcode
- Public Class FrmFeuchtraum
- Private Sub FrmFeuchtraum_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- '###Log-Eintrag starten
- My.Application.Log.DefaultFileLogWriter.BaseFileName = IO.Path.Combine(Application.StartupPath, "Logbuch")
- My.Application.Log.DefaultFileLogWriter.AutoFlush = True
- My.Application.Log.WriteEntry("PRG-Feuchtmittelraum wurde gestartet, '" & Date.Now & "'", TraceEventType.Information, 1)
- My.Application.Log.DefaultFileLogWriter.Close()
- End Sub
- End Class
Mit diesem Code lese ich die Logbuch.log in die DataGridView
VB.NET-Quellcode
- Public Class FrmLogbuch
- Dim table As New DataTable
- Private Sub FrmLogbuch_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- table.Columns.Add("Standardquelle", GetType(String))
- table.Columns.Add("Information", GetType(String))
- table.Columns.Add("Type", GetType(String))
- table.Columns.Add("Meldung", GetType(String))
- table.Columns.Add("Datum", GetType(Date))
- table.Columns.Add("Uhrzeit", GetType(TimeSpan))
- DataGridViewLogbuch.DataSource = table
- Dim lines() As String
- Dim vals() As String
- lines = File.ReadAllLines("C:\Users\gebha\source\repos\DruckereimanagerBeta\bin\Debug\Logbuch.log")
- For i As Integer = 0 To lines.Length - 1 Step +1
- vals = lines(i).ToString().Split(CChar("|"))
- Dim row(vals.Length - 1) As String
- For j As Integer = 0 To vals.Length - 1 Step +1
- row(j) = vals(j).Trim()
- Next j
- table.Rows.Add(row)
- Next i
- End Sub
- End Class
Problem ist, dass das einlesen nur funktioniert, wenn in den zwischräumen ein "|" ist. Also so:
DefaultSource | Information | 1 | PRG-Feuchtmittelraum wurde gestartet | 20.06.2023 | 11:17:28
Git es eine Möglichkeit, die log Datei so zu speichern, das es mir die zwischenräume mit einem "|" füllt?
Gruß und Danke
Gebhard