Parkplatzabrechnung

This commit is contained in:
2024-01-03 11:40:17 +01:00
parent 90a0b3afc3
commit ef89c1359a
9 changed files with 76 additions and 33 deletions

View File

@@ -160,7 +160,7 @@ Public Class cProgramFunctions
Dim line As String = ""
For Each column As DataColumn In dt.Columns
'Add the Data rows.
line += ";" & row(column.ColumnName).ToString().Replace(";", ",")
line += ";" & row(column.ColumnName).ToString().Replace(";", ",").Replace(vbNewLine, "").Replace(vbCr, "").Replace(vbLf, "").Replace(vbCrLf, "").Replace(System.Environment.NewLine, " ")
Next
'Add new line
txt += line.Substring(1) & vbCrLf