MS Update MEssaging

This commit is contained in:
2023-10-11 14:48:29 +02:00
parent 8fcb422592
commit e2389321ce
6 changed files with 8 additions and 5 deletions

View File

@@ -703,7 +703,7 @@ Public Class clsDateiverarbeitung
Logger.Debug("indexvalue read is: '" & wdIndexwert & "'")
Try
Dim oConvertDT As DateTime
If DateTime.TryParse(wdIndexwert, oConvertDT) Then
If DateTime.TryParse(wdIndexwert.ToString, oConvertDT) Then
Logger.Debug("indexvalue is datetime - converting to date")
Dim myDate As Date = wdIndexwert
wdIndexwert = Format(myDate, "yyyy-MM-dd")