This commit is contained in:
2022-07-08 08:12:07 +02:00
parent e3843466c8
commit 46c14b6500
34 changed files with 1958 additions and 678 deletions

View File

@@ -665,7 +665,7 @@ Public Class cBrgDb
from tblTelotec_Sicherheit inner join [tblTelotec_Anmeldung] on telanm_id = telgrt_telanmId
where [tblTelotec_Anmeldung].[dec_CreateDate] BETWEEN '" & datumVon.ToShortDateString & " 00:00:00' AND '" & datumBis.ToShortDateString & " 23:23:59' AND telanm_Status BETWEEN '" & statusVon & "' AND '" & statusBis & "' AND GRN = '" & buergschaft & "' AND [telnam_aktuellsteNachricht]=1 "
'MsgBox(sql)
' MsgBox(sql)
Dim dr As SqlDataReader
Dim daten As New List(Of cBuergschaft)
Using conn As SqlConnection = VERAG_PROG_ALLGEMEIN.SQL.GetNewOpenConnectionFMZOLL()
@@ -1042,6 +1042,7 @@ Public Class cBrgDb
" FROM tblZolaris_EZoll_NCTS WHERE ( AnmeldungsDatum BETWEEN '" & datumVon & "' AND '" & datumBis & "') AND GRN = '" & buergschaft & "' " & where
' Dim daten As New List(Of cEntry)
Dim dr As SqlDataReader
Dim daten As New List(Of cBuergschaft)
Using conn As SqlConnection = VERAG_PROG_ALLGEMEIN.SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand(sql, conn)