tutorials.de Buch-Aktion 05/2012
ERLEDIGT
NEIN
ANTWORTEN
2
ZUGRIFFE
2637
EMPFEHLEN
  • An Twitter übertragen
  • An Facebook übertragen
AUF DIESES THEMA
ANTWORTEN
  1. #1
    hak_andi hak_andi ist offline Grünschnabel
    Registriert seit
    Aug 2006
    Beiträge
    2
    Hallo!

    Ich habe ein Problem mit dem Insert-Command: (Vb.NET 2002)
    Es geht um Daten, die aus Textfeldern in eine Access-Datenbank aktualisiert werden sollen. (Außerdem werden diese in einem DataGrid angezeigt)

    Code:

    Code :
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    
    Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
            Me.daKfzDatenbank.InsertCommand.Parameters("aMarke").Value() = Me.txtMarke.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aType").Value() = Me.txtType.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aMotorisierung").Value() = Me.txtMotor.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aKennzeichen").Value() = Me.txtKennzeichen
            Me.daKfzDatenbank.InsertCommand.Parameters("aBaujahr").Value() = Me.txtBaujahr.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aAnschaffungsdatum").Value() = Me.txtAnschDatum.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aKosten").Value() = Me.txtAnschKosten.Text
            Me.daKfzDatenbank.InsertCommand.Parameters("aKilometerstand").Value() = Me.txtKm.Text
     
           Try 
                Me.OleDbConnection1.Open()
                Me.daKfzDatenbank.InsertCommand.ExecuteNonQuery() 
                Me.OleDbConnection1.Close()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
           
            Me.DsKfzDatenbank.Clear()
            Me.daKfzDatenbank.Fill(Me.DsKfzDatenbank)
        End Sub

    Klickt man nun auf den Button Speichern (btnSave), kommt diese Fehlermeldung:
    Ein Objekt muss IConvertible implementieren

    Könnt ihr mir da helfen? Ich habe keine Ahnung, was diese Fehlermeldung bedeutet

    Danke im Vorraus!
     

  2. #2
    hak_andi hak_andi ist offline Grünschnabel
    Registriert seit
    Aug 2006
    Beiträge
    2
    Hat keiner eine Idee?
     

  3. #3
    hajo-muc hajo-muc ist offline Grünschnabel
    Registriert seit
    Apr 2009
    Beiträge
    1
    Auf die Gefahr hin, dass diese Antwort zu spät kommt:
    Der Fehler dürfte in der folgenden Code-Zeile zu finden sein:
    Me.daKfzDatenbank.InsertCommand.Parameters("aKennzeichen").Value() = Me.txtKennzeichen
    Mit dieser Anweisung wird einem Parameter, der als Zuweisung einen String erwartet, ein Textbox-Objekt zugewiesen. Die etwas irreführende Fehlermeldung dürfte darin ihren Grund haben, dass die Umgebung versucht, das TextBox-objekt in einen String zu konvertieren und zu diesem Zweck versucht, die im Textbox-Objekt nicht implementierte Schnittstelle IConvertible aufzurufen, genauer gesagt die Methode IConvertible.ToString. Weil TextBox nicht IConvertible implementiert, misslingt die Datenkonversion.
    Mit folgendem Code dürfte es klappen:
    Me.daKfzDatenbank.InsertCommand.Parameters("aKennzeichen").Value() = Me.txtKennzeichen.Text
     

Ähnliche Themen

  1. MySQL und DBExpress "you can't run this command now"
    Von marko im Forum Delphi, Kylix, Pascal
    Antworten: 0
    Letzter Beitrag: 02.04.08, 12:51
  2. Antworten: 3
    Letzter Beitrag: 24.11.06, 16:38
  3. Antworten: 5
    Letzter Beitrag: 01.03.06, 21:42
  4. Antworten: 4
    Letzter Beitrag: 21.06.04, 20:37
  5. Ersatzfunction für command identifier "SaveAs"
    Von Ossi im Forum Javascript & Ajax
    Antworten: 3
    Letzter Beitrag: 20.01.04, 13:15