AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Modules.Interface: Datumsformat immer 8-stellig (yyyyMMdd) aufbereiten

Browse Source
This commit is contained in:
PitzM 2025-07-04 14:02:27 +02:00
parent 623807c55d
commit 262805d112
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Interfaces/ZUGFeRDInterface/PropertyValues.vb
View File

@ -332,10 +332,10 @@ Public Class PropertyValues
s = Convert.ToString(Obj) s = Convert.ToString(Obj)
If IsDate(s) Then If IsDate(s) Then
' Hier wird das DEFAULT-Format auf yyyy-MM-dd gesetzt ' Hier wird das DEFAULT-Format auf yyyyMMdd gesetzt
Dim dtfi As DateTimeFormatInfo = CultureInfo.CreateSpecificCulture(CultureInfo.InvariantCulture.Name).DateTimeFormat Dim dtfi As DateTimeFormatInfo = CultureInfo.CreateSpecificCulture(CultureInfo.InvariantCulture.Name).DateTimeFormat
dtfi.DateSeparator = "-" dtfi.DateSeparator = ""
dtfi.ShortDatePattern = "yyyy/MM/dd" dtfi.ShortDatePattern = "yyyyMMdd"
d = CDate(s) d = CDate(s)
oResult = d.ToString("d", dtfi) oResult = d.ToString("d", dtfi)