Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Tabelle updaten....Fehler
Autor: Mensu
Datum: 13.03.06 14:44
Hallo, ich quäle mich seit Tagen mit dem vertsehen von ADO.net (in meinem Fall in VB 2005 Express). untenstehender Code funktioniert fürs aktualisieren nicht....einlesen tut er richtig, ändern kann ich im Grid, aber beim drücken auf UPDATE kommt die Fehlermeldung....was mache ich falsch?? Main-Form: --------------- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Try ÖffneDatenbank("C:\Datenbank.mdb", "passwort") ds = (SucheDatensätze(Tabellenname)) DataGridView1.DataSource = (ds.Tables(0)) SchliesseDatenbank() Catch ex As Exception MsgBox(ex.Message) End Try End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click AktualisiereTabelle("Motordaten", ds) End Sub Modul Datenbank: -------------------------- Public con As New OleDb.OleDbConnection Public Function ÖffneDatenbank(ByVal Datenbank As String, Optional ByVal Passwort As String = "") As String Try con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Datenbank & ";Jet OLEDBatabase Password=" & Passwort & ";" con.Open() Return Nothing Catch ex As Exception Return ex.Message End Try End Function Public Function SchliesseDatenbank() As String Try con.Close() Return Nothing Catch ex As Exception Return ex.Message End Try End Function Public Function SucheDatensätze(ByVal Tabellename As String, Optional ByVal Bedingungen As String = "") As DataSet Dim da As New OleDb.OleDbDataAdapter Dim ds As New DataSet Try da = New OleDb.OleDbDataAdapter("SELECT * FROM " & Tabellename & " " & Bedingungen, con) da.Fill(ds, Tabellename) Return ds Catch ex As Exception Return Nothing End Try End Function Public Function AktualisiereTabelle(ByVal Tabellename As String, ByRef ds As DataSet) As String Dim da As New OleDb.OleDbDataAdapter Dim builder As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(da) Dim command As New OleDb.OleDbCommand("UPDATE " & Tabellename & " SET Kennummer = ?, Typ = ? WHERE Kennummer = ?", con) da.UpdateCommand = command da.Update(ds, Tabellename) Return Nothing End Function erzeugt an der Stelle: da.Update(ds, Tabellenname) folgenden Fehler: Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben.

Tabelle updaten....Fehler	2.771	Mensu	13.03.06 14:44
Re: Tabelle updaten....Fehler	2.041	Zero-G.	13.03.06 15:01
Re: Tabelle updaten....Fehler	2.081	DaveS	13.03.06 15:10
Re: Tabelle updaten....Fehler	2.038	mb2k3	13.03.06 15:13
Re: Tabelle updaten....Fehler	1.971	Mensu	13.03.06 15:24
Re: Tabelle updaten....Fehler	2.008	DaveS	13.03.06 15:27
Re: Tabelle updaten....Fehler	1.982	Mensu	13.03.06 15:47
Re: Tabelle updaten....Fehler	1.982	DaveS	13.03.06 15:51
Re: Tabelle updaten....Fehler	1.963	Mensu	13.03.06 15:57
Re: Tabelle updaten....Fehler	1.969	DaveS	13.03.06 16:14
Re: Tabelle updaten....Fehler	1.995	mb2k3	13.03.06 16:10
Re: Tabelle updaten....Fehler	2.006	Mensu	14.03.06 09:30
Re: Tabelle updaten....Fehler	2.042	FZelle	14.03.06 11:15
Re: Tabelle updaten....Fehler	1.999	Mensu	16.03.06 16:11
Re: Tabelle updaten....Fehler	1.997	Mensu	18.03.06 13:26
Re: Tabelle updaten....Fehler	1.993	DaveS	18.03.06 13:42
Re: Tabelle updaten....Fehler	1.987	Mensu	18.03.06 19:37
Re: Tabelle updaten....Fehler	1.959	DaveS	18.03.06 19:56
Re: Tabelle updaten....Fehler	1.930	Mensu	20.03.06 09:39
Re: Tabelle updaten....Fehler	2.006	DaveS	20.03.06 14:30
Re: Tabelle updaten....Fehler	2.245	Mensu	20.03.06 16:30
Re: Tabelle updaten....Fehler	1.982	DaveS	20.03.06 17:48
Re: Tabelle updaten....Fehler	1.945	Mensu	20.03.06 20:11
Re: Tabelle updaten....Fehler	2.382	DaveS	20.03.06 20:23

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen