cAutomailversand, etc.

2026-10-23 10:07:12 +02:00
parent ed2e63a004
commit 38972e3f32
1 changed files with 2 additions and 2 deletions
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -6415,8 +6415,8 @@ weiter:
        ElseIf txtUTADate.Text <> "" AndAlso IsDate(txtUTADate.Text) Then
            datumString = txtUTADate.Text
            SQLWhere = "And CAST(U.Rechnungsdatum AS date) = '" & datumString & "'"
-            von = New Date(datumString)
-            bis = New Date(datumString)
+            von = CDate(datumString)
+            bis = CDate(datumString)
        End If