Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Access - Dehler Datenbankzugriff





Frage

Hallo, habe ein Problem mit folgendem Quelltext, programmiert in Access-VBA (nicht von mir): Private Sub Befehl7_Click() Dim db As Database Dim satz As Recordset Set db = CurrentDb Set satz = db.OpenRecordset("QRYPersonen") Dim Daten As String Me![Personenliste].ColumnHeads = True Me![Personenliste].ColumnCount = 3 Daten = "Nummer; Name; Vorname;" satz.MoveFirst Do Until satz.EOF = True Daten = Daten & satz![Nummer] & ";" & satz![Name] & ";" & satz![Vorname] & ";" satz.MoveNext Loop Me![Personenliste].RowSource = Daten End Sub Das ganze funktioniert unter Access 97 ohne Probleme, konvertiert auf Access 2000 bekomme ich aber folgende Fehlermeldung: "Laufzeitfehler ´3061´: 4 Parameter wurden erwartet, aber es wurden zu wenige Parameter übergeben." Nach betätigen des Buttons "debuggen" wird folgende Zeile markiert: Set satz = db.OpenRecordset("QRYPersonen") Jemand eine Idee woran das liegen kann? Ich stehe jedenfalls gerade auf dem Schlauch, trotz Google-Suche.

Antwort 1 von Teddy7

Versuch´s erst mal mit der einfachen Lösung:

Dim db As DAO.Database
Dim satz As DAO.Recordset

Gruß
Teddy

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: