vb.net <-> MySQL

[svenkas]

Habe ein kleines Problem beim Updaten meiner Datenbank.
Das Anlegen von neuen Datensätzen funktioniert wunderbar, doch wenn ich versuche einen Datensatz zu updaten erscheint folgender Fehler:

---> Eine nicht behandelte Ausnahme des Typs 'System.Runtime.InteropServices.COMException' ist in MAN.exe aufgetreten.

Zusätzliche Informationen: [Microsoft][ODBC Driver Manager] Ungültige Zeichenfolgen- oder Pufferlänge

Kann mir jemand bei der Lösung meines Problemes helfen

Private Sub cb_anlegen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cb_anlegen.Click

Dim db As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strSQL As String

db = New ADODB.Connection
rs = New ADODB.Recordset

strSQL = cmb_Auftrag.SelectedItem

db.Open("PROVIDER=msdasql;DSN=MAN")

rs.Open("SELECT * FROM Aufträge WHERE Auftragsnummer = " + Chr(34) & strSQL & Chr(34) + "", db, 3, 3)

If (rs.EOF = False) Then
rs("Extern").Value = TB_AG_Nummer.Text
rs("Abrechnungsart").Value = TB_Abrechnungsart.Text
rs("Anlage").Value = tb_Anlage.Text
rs("Maschine").Value = tb_Maschine.Text
rs("Tätigkeit").Value = tb_Leistung.Text
rs("Auftraggeber").Value = tb_Auftraggeber.Text
rs("Sollstunden").Value = TB_Sollstunden.Text
rs("rss1").Value = TB_RSS1.Text
rs("Kostenstelle").Value = TB_Kostenstelle.Text
rs.Update()
MsgBox("Ihr Auftrag: " & cmb_Auftrag.SelectedItem & " wurde aktualisiert.")
TB_RESET()
End If

rs.Close()
db.Close()
rs = Nothing
db = Nothing
End Sub

 

[XChris]

Soweit ich weiß, kannst Du nicht ADO auf den ODBC Treiber von MySQL anwenden ....

Nimm doch nen normales DataSet und den ODBCAdapter.

Chris

 

[svenkas]

ADO

Danke erstmal für die Antwort....

Alse ich kann auf idese Art und Weise kann ich Datensätze erzeugen und auch Datensätze laden. Es gibt nur Probleme wenn ich einen Datensatz updaten will. Noch ne Idee