Fehler bei der Verwendung von QueryDefs zurück Recordset

Ich versuche, auf eine Abfrage mit VBA-code. Ich glaube, ich habe es getan, auf diese Weise 100 mal. Mein code (für ein command-button), beginnt so:

Dim rstDocCount As Recordset

Set rstDocCount = CurrentDb.QueryDefs("DocCount").OpenRecordset

rst.MoveFirst

Bekomme ich diese Fehlermeldung:

Run-time error '3061': Too few parameters. Voraussichtlich zum 1.

Den Set rstDocCount Zeile ist gelb markiert.

Was mache ich falsch? Der einzige parameter sollte der name der Abfrage und den ich, klar, dass.

  • Öffnen Sie die Abfrage in der Datenbank-Fenster. Es wird Ihnen zeigen, welches Feld ist mispelled oder welcher parameter fehlt.
  • Es gibt kein problem mit der Abfrage. Ich bin in der Lage, um es zu öffnen, während das Formular geöffnet ist, aus dem dieser code ausgeführt wird. Die Abfrage einen parameter Formulare!Boxen!BoxID (Boxen ist die aktuelle form). Mein Verdacht ist, dass vba nicht Lesen können, dass Bereich aus irgendeinem Grund. Ich fand, dass wenn ich ersetzen Sie die Abfrage mit anderen Abfragen, die einen parameter vom Boxen-Formular, bekomme ich den gleichen Fehler. Wenn ich ersetzen Sie es mit einer einfacheren Abfrage, ist es kein problem. Also ich glaube, ich muss statt die Abfrage zeigt jeden Datensatz in einer Schleife durch Sie zu bekommen, um die eine, die passt die BoxID auf meine form.
  • Sie müssen nur den parameter. Siehe unten.
InformationsquelleAutor Michael T | 2012-06-19
  1. 6

    Benötigen Sie:

    Dim rstDocCount As Recordset
Dim qdf As QueryDef

    Set qdf = CurrentDb.QueryDefs("DocCount")

    qdf.Parameters("Forms!Boxing!BoxID") = Forms!Boxing!BoxID 
    Set rstDocCount = qdf.OpenRecordset

    rstDocCount.MoveFirst
    InformationsquelleAutor Fionnuala
  2. 1

    "Nur der parameter sollte der name der Abfrage und den ich, klar, dass."

    Den OpenRecordset Methode nimmt 3 Parameter entgegen: Type; Options; und LockEdit. Aber alle 3 Parameter sind optional, so dass die "Zu wenige Parameter" Fehler nicht über OpenRecordset Parameter.

    Statt, als Remou darauf hingewiesen, Ihre QueryDef zählen etwas (oft ein Feld Ausdruck) die db-engine nicht finden kann, in der Abfrage die Quell-Tabelle. In dieser situation, es behandelt die fehlende etwas als parameter verlangt einen Wert für diesen parameter.

    • Siehe mein Kommentar oben beantworten Remou.
    InformationsquelleAutor HansUp
Schreibe einen Kommentar