Daten speichern in Accessdatenbank

  • VB6

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

    Daten speichern in Accessdatenbank

    Hallo Marcus,

    ich habe eine Access.mdb erstellt. Es ist eine Tabelle mit 37 Feldern, 13 davon sind Checkboxen.
    Nun habe ich auch das Formular mit den Textboxen und Checkboxen usw. erstellt.
    Wenn ich den Button speichern klicke sollen die Daten in die Access.mdb gespeichert werden.
    Wie sieht der Sourcecode aus für den speicherbefehl?
    Muss eigentlich ein Datensteuerelement in das Formular eingefügt werden?
    Ich bin Dir sehr dankbar für deine Hilfe.

    Gruß
    Chara


    Hi. da gibt es mehrere Moglichkeiten mal die Möglichkeit mit DAO:
    Private Sub Form_Load()

    Dim dbDatenbank As DAO.Database
    Dim rstAdressen As DAO.Recordset

    Dim mdbVerzeichnis As String, Tabelle As String
    On Error GoTo dbleer

    ' In der Variablen mdbVerzeichnis muß der Pfad zur Microsoft Database angegeben werden
    ' In der Variablen Tabelle muß der Name der Tabelle eingegeben werden.
    ' Bitte die Tabelle "tblAdressen" nennen sonst geht die Filter-Funktion nicht

    MsgBox "Erst den Quelltext im Form_Load Ereignis lesen"

    mdbVerzeichnis = "C:\Adressen.mdb"
    Tabelle = "tblAdressen"
    Set dbDatenbank = DBEngine.Workspaces(0).OpenDatabase(mdbVerzeichnis)
    Set rstAdressen = dbDatenbank.OpenRecordset(Tabelle, dbOpenDynaset)


    rstAdressen.MoveFirst

    Call FelderAnbinden
    Call FelderSperren

    Exit Sub

    dbleer:
    MsgBox "Datenbank scheint leer zu sein! Neuen Datensatz eingeben?"
    Call cmdNeu_Click

    End Sub