neu

SDL/mdm/frmMDMDatenverarbetiung.vb

@@ -382,47 +382,6 @@ Public Class frmMDMDatenverarbetiung
             Dim reader As OleDbDataReader = Nothing
 
 
-            'Dim sqlstrACCDB As String = "SELECT count(*) FROM tblMaut WHERE 1=1"
-            'Try
-
-
-            '    con.Open()
-
-            '    cmd = New OleDbCommand(sqlstrACCDB, con)
-            '    'reader = cmd.ExecuteReader()
-            '    'MsgBox("da issa ")
-
-            '    Using oRDR As OleDbDataReader = cmd.ExecuteReader
-            '        While (oRDR.Read)
-            '            MsgBox(oRDR.GetValue(0)) 'gets the first returned column
-            '        End While
-            '    End Using
-
-            '    'While reader.Read
-            '    '    MsgBox("da issa2 ")
-
-            '    '    MessageBox.Show(reader.GetString(0).ToString & vbTab & vbTab & reader.GetString(1).ToString)
-            '    'End While
-            '    'MsgBox("da issa3 ")
-
-            'Catch ex2 As System.Exception
-            '    MsgBox("err: " & ex2.Message & ex2.StackTrace)
-
-            'Finally
-            '    If reader IsNot Nothing Then reader.Close()
-            'End Try
-
-
-
-            'reader.Close()
-            'cmd.Connection = con
-            'cmd.CommandText = "SELECT * FROM tblMaut"
-
-            'cmd.ExecuteReader()
-
-            'cmd.CommandText = "INSERT INTO table1(Neyms) VALUES('" + var1 + "')"
-            'cmd.ExecuteNonQuery()
-
 
             If dt IsNot Nothing Then
                 con.Open()