Variable wird nicht angenommen

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von INOPIAE.

    Variable wird nicht angenommen

    Hallo,
    ich versteh mal wieder die Weld nicht!

    Ich möchte einen Zahlenwert in eine mySql Tabelle schreiben.
    Dieser befindet sich in einer Variable die aber aus irgent einem Grund nicht angenommen wird! Ich erhalte einen Laufzeitfehler: "Der ODBC Treiber unterstützt die angeforderte Eigenschaft nicht"

    Visual Basic-Quellcode

    1. Private Sub Command2_Click()
    2. Dim wert As Integer
    3. wert = Me.Text1
    4. Debug.Print wert
    5. Set mc = New ADODB.Connection
    6. mc.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};port=3306;Server=localhost;Database=trbus;User=root;Password=;Option=3;"
    7. mc.Open
    8. Dim rs As ADODB.Recordset
    9. Set rs = New ADODB.Recordset
    10. rs.Open "update statusanzeige set Feld1 = Wert", mc, adOpenStatic, adLockOptimistic
    11. mc.Close
    12. End Sub


    Schreibe ich direkt einen Zahlenwert in die rs.Open.. Zeile, so wird diese ohne weiteres gespeichert.
    Was mache ich hier falsch?
    Wenn Du mit dem Recordsets arbeitestist der Weg in etwa so
    Laden der Daten in den Recordset
    Verändern der Daten innerhalb des Recordset
    Aktualisieren der Daten in die Datenbank mit rs.update/rs.updatebatch
    Schließen und Entladen des Recordsets.
    NB. Es ist doch schön, wenn man lesbare Namen vergibt. Siehe auch [VB.NET] Beispiele für guten und schlechten Code (Stil).