Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Datenbank bearbeiten geht nicht
Autor: Master P
Datum: 12.07.04 14:16
Hi kann keine Datensätze die ich bearbeitet habe nicht speichern. Neue Datensätze zu erstellen funktioniert. Fehlermeldung: Laufzeitfehler 3251 Das aktuell Recordset unterstützt keine Aktuallisierung. Hierbei handelt es sich möglicherweise um eine Einschränkung seitens des Providers oder des gewählten LockTypes Source: Option Explicit Dim con As ADODB.Connection Dim rs As ADODB.Recordset Dim sql As String Dim intSpeichern As Integer Private Sub Form_Load() Dim ApplicationPath As String ApplicationPath = IIf(Right(App.Path, 1) = "\", App.Path, App.Path + "\") Set con = New ADODB.Connection con.Mode = adModeReadWrite con.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & ApplicationPath & "Buecher.mdb;" Set rs = New ADODB.Recordset rs.Open "select BuchNr,BuchName,Regal from Buecher Order by BuchNr", con, adOpenDynamic, adLockOptimistic, 1 Füllen der ListViews End Sub Private Sub xpcmdSpeichern_Click() If intSpeichern = 1 Then If txtBuchNr <> "" And txtBuchName <> "" _ And txtRegal <> "" Then rs!BuchName = txtBuchName rs!Regal = txtRegal rs.Update End If End If If intSpeichern = 2 Then If txtBuchNr <> "" And txtBuchName <> "" _ And txtRegal <> "" Then rs.AddNew rs!BuchNr = txtBuchNr rs!BuchName = txtBuchName rs!Regal = txtRegal rs.Update End If End If End Sub

Datenbank bearbeiten geht nicht	432	Master P	12.07.04 14:16
Re: Datenbank bearbeiten geht nicht	264	Dieter	12.07.04 17:28
Re: Datenbank bearbeiten geht nicht	244	Master P	12.07.04 21:40
Re: Datenbank bearbeiten geht nicht	265	Master P	13.07.04 22:03

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