.....
        dv = New DataView(dataset.Tables(tableName))
        BindingSource.DataSource = dv
        DataGridView1.DataSource = BindingSource
.....

.....
Dim cmd As New SqlCommand
        Dim sqlConnection As New SqlConnection(myconnectString)
        For i As Integer = 0 To UBound(anArray)
            cmd.CommandText = "INSERT INTO " + tableName + "(" + Join(f2, ",") _
              + _
                ") VALUES (" + anArray(i) + ")"
            cmd.CommandType = CommandType.Text
            cmd.Connection = sqlConnection
 
            sqlConnection.Open()
            cmd.ExecuteNonQuery()
            sqlConnection.Close()
        Next
.....

.....
            BindingSource.EndEdit()
            Try
                ' geänderte Masterdaten vom DataSet in die Datenbank übertragen
                da.Update(dataset, tableName)
            Catch ex As Exception
                MessageBox.Show(ex.Message, "UPDATING")
            End Try
.....

Salzburger