Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Datenbank
Autor: evil_uwe
Datum: 30.01.03 07:33
Hi, ich habe ein Problem (wer hat das nicht). Ich suche anhand einer Variablen ein Feld in einer DB und will, wenn ich es gefunden habe, ein Tabellenfeld mit der Anzahl erhöhen. Wenn ich nichts gefunden habe, soll ein neuer Datensatz angelegt werden. Die Suchroutine funktioniert auch, aber beim Schreiben auf die DB kommt ein Fehler:"Das Project oder der Provider kann den angeforderten Vorgang nicht ausführen!". Was habe ich falsch gemacht?? Anbei der Code Gruß Uwe Private Sub mnuaktualisieren_Click() '** Dim Rs As New ADODB.Recordset Dim V_Anzahl As Integer '** Prüfen '** If Error = True Then Exit Sub '** Rs.Open "Select * " & _ "FROM .... " & _ "WHERE [...].[...] = " & Variable & " " & _ "ORDER BY [...].[...]", CN, adOpenKeyset '** If Rs.RecordCount > 0 Then GoTo Anzahl_erhöhen Else GoTo Neue_Figur End If '** Anzahl_erhöhen: '** V_Anzahl = Rs.Fields!Anzahl V_Anzahl = V_Anzahl + 1 Rs.Fields("Anzahl").Value = V_Anzahl Rs.Update Exit Sub '** Neue_Figur: '** With Rs .AddNew .Fields!... .... .Update End With '** CN.Close '** End Sub

Datenbank	104	evil_uwe	30.01.03 07:33
Re: Datenbank	190	Eddy	30.01.03 08:18
Re: Datenbank	45	evil_uwe	30.01.03 09:44
Re: Datenbank	240	Eddy	30.01.03 09:57
Re: Datenbank	43	evil_uwe	30.01.03 11:52

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