neu

2020-12-13 21:32:29 +01:00
parent 0be9927381
commit 3bc1c8a309
48 changed files with 19407 additions and 302 deletions
--- a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte
+++ b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte
@@ -131,9 +131,9 @@ Public Class MyDatagridview
        End If
    End Sub

-    Public Sub LOAD()
+    Public Sub LOAD(Optional showErr As Boolean = False, Optional ByRef errOccured As Boolean = False)
        If SQL_STR <> "" Then
-            Me.DataSource = SQL.loadDgvBySql_Param(SQL_STR, CONN_ART, , SQL_PARAM)
+            Me.DataSource = SQL.loadDgvBySql_Param(SQL_STR, CONN_ART, , SQL_PARAM, showErr, errOccured)
        End If
    End Sub