Moin,
ich möchte Tabellen bearbeiten und lade die per MySql. Soweit kein Problem.
Jetzt kommt das Update...Die Tabellen haben natürlich alle eine ID Spalte die primery und auto_increment ist. Beim Update Command erhalte ich natürlich den Fehler, dass die Primery Spalte nicht beschrieben werden kann.
Wie kann ich das abschalten?
Ich kriege den Fehler nur, wenn ich eine andere Tabelle bearbeite. Ich wechsel durch eine combobox die angezeigte Tabelle.
ich möchte Tabellen bearbeiten und lade die per MySql. Soweit kein Problem.
Jetzt kommt das Update...Die Tabellen haben natürlich alle eine ID Spalte die primery und auto_increment ist. Beim Update Command erhalte ich natürlich den Fehler, dass die Primery Spalte nicht beschrieben werden kann.
Wie kann ich das abschalten?
Ich kriege den Fehler nur, wenn ich eine andere Tabelle bearbeite. Ich wechsel durch eine combobox die angezeigte Tabelle.
VB.NET-Quellcode
- Private bindingSource1 As New BindingSource()
- Private dataAdapter As New MySqlDataAdapter
- Private Sub LoadConnection(tablename As String)
- Dim connectionString As String = fmMain.myConnectionString
- Dim selectCommand As String
- Dim connection As New MySqlConnection
- connection.ConnectionString = connectionString
- selectCommand = "select * FROM " & tablename
- Me.dataAdapter = New MySqlDataAdapter(selectCommand, connection)
- With dgvInventar
- .AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
- .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.ColumnHeader
- .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.ColumnHeader
- End With
- Dim commandBuilder As New MySqlCommandBuilder(Me.dataAdapter)
- Dim table As New DataTable()
- table.Locale = System.Globalization.CultureInfo.InvariantCulture
- Me.dataAdapter.Fill(table)
- Me.bindingSource1.DataSource = table
- Dim data As New DataSet()
- data.Locale = System.Globalization.CultureInfo.InvariantCulture
- dgvInventar.DataSource = Me.bindingSource1
- dgvInventar.AlternatingRowsDefaultCellStyle.BackColor = Color.Aqua
- dgvInventar.AutoResizeColumns(DataGridViewAutoSizeColumnsMode.AllCells)
- End Sub
- Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
- Dim table As New DataTable()
- Me.bindingSource1 = dgvInventar.DataSource
- table = Me.bindingSource1.DataSource
- Me.dataAdapter.Update(table)
- End Sub
~Wir leben zwar alle unter dem gleichen Himmel, aber es haben nicht alle den gleichen Horizont~
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „razzzer530i“ ()