Hi Leute,
wenn ich folgenden Code ausführe passiert
rein garnichts!
<PRE>
Dim _upd_cmd As New OleDbCommand
_upd_cmd.CommandText = "UPDATE tbl_PLZ " & _
"SET ID_PLZ = @PLZ, " & _
"Ort = @Ort, " & _
"Ortsteil = @Ortsteil " & _
"WHERE ID_PLZ = @PK_PLZ"
_upd_cmd.Connection = _einstellungen.DatenbankConnection
_upd_cmd.Parameters.Add("@PLZ", OleDbType.VarChar).Value = tb_Postleitzahl.Text
_upd_cmd.Parameters.Add("@Ort", OleDbType.VarChar).Value = tb_Ort.Text
_upd_cmd.Parameters.Add("@Ortsteil", OleDbType.VarChar).Value = tb_Ortsteil.Text
_upd_cmd.Parameters.Add("@PK_PLZ", OleDbType.VarChar).Value = _suchergebnis.Postleitzahl
_da.UpdateCommand = _upd_cmd
_einstellungen.DatenbankConnection.Open()
_da.Update(_ds, "Ort")
_einstellungen.DatenbankConnection.Close()
</PRE>
Es wird keine Exception ausgelöst, aber es ändert sich auch nichts in der Datenbank!
Kann mir jmd. weiterhelfen?
Danke & Gruß,
Daniel
wenn ich folgenden Code ausführe passiert
rein garnichts!
<PRE>
Dim _upd_cmd As New OleDbCommand
_upd_cmd.CommandText = "UPDATE tbl_PLZ " & _
"SET ID_PLZ = @PLZ, " & _
"Ort = @Ort, " & _
"Ortsteil = @Ortsteil " & _
"WHERE ID_PLZ = @PK_PLZ"
_upd_cmd.Connection = _einstellungen.DatenbankConnection
_upd_cmd.Parameters.Add("@PLZ", OleDbType.VarChar).Value = tb_Postleitzahl.Text
_upd_cmd.Parameters.Add("@Ort", OleDbType.VarChar).Value = tb_Ort.Text
_upd_cmd.Parameters.Add("@Ortsteil", OleDbType.VarChar).Value = tb_Ortsteil.Text
_upd_cmd.Parameters.Add("@PK_PLZ", OleDbType.VarChar).Value = _suchergebnis.Postleitzahl
_da.UpdateCommand = _upd_cmd
_einstellungen.DatenbankConnection.Open()
_da.Update(_ds, "Ort")
_einstellungen.DatenbankConnection.Close()
</PRE>
Es wird keine Exception ausgelöst, aber es ändert sich auch nichts in der Datenbank!
Kann mir jmd. weiterhelfen?
Danke & Gruß,
Daniel
Comment