Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Data1 zeigt mir immer an, das er nur einen eintrag findet
Autor: Resoucer
Datum: 08.01.04 14:59
Also, ich habe eine datenbank mit 5 einträgen, mein Data1 Steuerelement zeigt aber an das er nur ein Datensatz findet. Warum ? Mein Code (etwas viel, aber damit ihr den ganzen Code sieht) Dim zahl1 Dim SQL1 As String Dim rs1 As Recordset Dim start1 As Integer 'Datenbank öffnen Dim db As Database Dim dbFile As String Dim SQL As String Dim rs As Recordset Dim db2 As Database Randomize zahl1 = Zufallszahl(1, Label5.Caption) Label4.Caption = zahl1 'Datenbank öffnen 'Recordset auf Basis einer SQL-Abfrage erstellen und öffnen SQL1 = "SELECT * FROM aufg" 'findet 1 von 5 Einträgen die gefunden werden müssen 'SQL1 = SQL1 + " WHERE id " 'ab hier findet er keinen mehr 'SQL1 = SQL1 + "= '" + Label4.Caption 'SQL1 = SQL1 + "' and art = '" 'SQL1 = SQL1 + start.art + "'" 'SQL1 = SQL1 + " and ergebnis < '" + start.bis + "'" 'dbFile = App.Path + "\datenbank\aufgaben.MDB" 'Set db = Workspaces.OpenDatabase(dbFile, False, False) 'Recordset auf Basis einer SQL-Abfrage erstellen und öffnen 'Set rs = db.OpenRecordset(SQL1) Data1.RecordSource = SQL1 Data1.Refresh Me.Caption = Data1.Recordset.RecordCount Label6.Caption = Data1.Recordset.RecordCount If Label6.Caption < 1 Then List1.AddItem "1 " & (Label5.Caption) & zahl1 & Data1.Recordset.RecordCount test1 = test1 + 1 If test1 > 10 Then Exit Sub Else zufallsaufgabe End If Else On Error Resume Next 'Wenn ein Fehler auftritt, wird der Fehler übersprungen und der nächste '"Befehl" ausgeführt Set db2 = OpenDatabase(App.Path + "\datenbank" + "aufgaben.mdb") Me.Caption = Label6.Caption Set labelfeld1 = db2.OpenRecordset _ (SQL1) Label1.Caption = labelfeld1.Fields("rechnung") test1 = 0 End If End Sub

Data1 zeigt mir immer an, das er nur einen eintrag findet	822	Resoucer	08.01.04 14:59
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	591	Zero-G.	08.01.04 15:17
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	552	Resoucer	09.01.04 17:41
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	507	nelson2000	09.01.04 21:12
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	539	Resoucer	09.01.04 21:29
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	542	nelson2000	09.01.04 21:55
Re: Data1 zeigt mir immer an, das er nur einen eintrag finde...	552	Resoucer	10.01.04 10:42

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