Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Datenbank Öffnen/Schließen
Autor: prihei
Datum: 25.02.03 14:56
Hi, nein, ich habe es zwar nicht ausprobiert, meine es aber ungefähr so: Dim Db As Database Dim Tabelle As Recordset Dim dbFile As String Private Sub Form_Load() 'Datenbank öffnen dbFile = App.Path + "\DATA.MDB" Set Db = Workspaces(0).OpenDatabase(dbFile, False, False) Set Tabelle = Db.OpenRecordset("MP3") End Sub Private Sub cmdSave_Click(Index As Integer) 'Neuen Datensatz hinzufügen Tabelle.AddNew Tabelle("Datum") = "txtDate" Tabelle("Interpret") = "txtInterpret" Tabelle("Titel") = "txtTitel" Tabelle.Update Tabelle.Bookmark = Tabelle.LastModified End Sub Private Sub cmdCancel_Click(Index As Integer) Unload Me 'Datenbank schließen Tabelle.Close Db.Close Set Tabelle = Nothing Set Db = Nothing End Sub

Datenbank Öffnen/Schließen	438	MT Arens	25.02.03 14:35
Re: Datenbank Öffnen/Schließen	66	prihei	25.02.03 14:43
Re: Datenbank Öffnen/Schließen	247	MT Arens	25.02.03 14:51
Re: Datenbank Öffnen/Schließen	56	prihei	25.02.03 14:56
Re: Datenbank Öffnen/Schließen	377	MT Arens	25.02.03 15:00

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