Office: Laufzeitfehler 3061 bei Parameterabfrage

Arki · 1. August 2003

Tag zusammen,

ich hab wieder mal ein kleines Problemchen, für das ich keine Lösung parat habe. Ich hab mich auch schon im Archiv und im FAQ umgeschaut, die dortigen Texte helfen mir auch nicht weiter, das Problem besteht weiterhin. Wenn ich die Abfrage als Recordset öffnen möchte, krieg ich die Meldung "1 Parameter wird erwartet" um die Ohren gehauen. Die Kombobox, die den Parameter beinhaltet, existiert und ist in der Abfrage auch mit dem richtigen Namen angegeben. Wenn ich die Abfrage nicht über das Formular öffne und einen Parameterwert eingebe, krieg ich die richtige Ergebnismenge geliefert.

Ich poste einfach mal den zugrunde liegenden Code und die SQL-Abfrage:

Code:

Dim db As DAO.Database
Dim rst As DAO.Recordset
...
Set db = CurrentDb()
...
Set rst = CurrentDb.OpenRecordset("qrySearchInternship", , dbReadOnly)
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Die SQL-Abfrage qrySearchInternship:

SELECT tblBetriebe.Name, tblVonBis.Von, tblVonBis.Bis, tblPraktikanten.pID
FROM tblBetriebe INNER JOIN (tblPraktikanten INNER JOIN tblVonBis ON tblPraktikanten.pID = tblVonBis.pID) ON tblBetriebe.bID = tblVonBis.bID
WHERE tblPraktikanten.pID LIKE forms.frmVonBisErfassen.cmbpID;
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Ich bin für jede Hilfe dankbar!

Grüße,
Markus

:)

Johnny Loser · 3. August 2003

Hi Arki,

also entweder

set rst = db.openrecordset("SELECT FROM.....")

oder

DoCmd.OpenQuery "QueryName"

MarioR · 3. August 2003

Hallo,

hast Du Dir FAQ 6.4 Ein Parameter wurde erwartet bei donkarl auch schon angeschaut?

Arki · 3. August 2003

Danke für eure Hilfen! Hat mein Problem allerdings nicht gelöst.

@MarioR: Ja, habe ich. Habs mit eval versucht, aber dennoch, die Fehlermeldung bleibt dieselbe.

Ich muss die Abfrage als RecordSet öffnen, da ich per VBA auf die einzelnen Felder zugreifen muss. Der DoCmd-Befehl hilft mir dementsprechend nicht weiter.

MarioR · 3. August 2003

Das Formular "frmVonBisErfassen" muss während des Aufrufs auch geöffnet sein. Ist das bei Dir der Fall?

Arki · 3. August 2003

Jepp, natürlich.

Ich habe in die AfterUpdate-Prozedur der Kombobox (Parameterwert) den entsprechenden Code geschrieben. Also, das Formular ist def. geöffnet, die Kombobox ist nicht deaktiviert oder sonstwas. Ich verstehe es einfach nicht.

MarioR · 3. August 2003

Wollte nur sicher gehen. *wink.gif*

Kehren wir nochmal zu Eval zurück - richtig muss es so aussehen:

Code:

...
WHERE tblPraktikanten.pID LIKE Eval("forms!frmVonBisErfassen!cmbpID");
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Hast Du das so probiert?

Arki · 3. August 2003

Hallo Mario,

ich hatte es zunächst folgendermaßen:

WHERE tblPraktikanten.pID LIKE Eval(forms!frmVonBisErfassen!cmbpID);
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Hatte ganz einfach die Anführungsstriche vergessen/übersehen, und somit gibt es natürlich nen Konflikt.

Ich danke dir vielmals für die Hilfe!

-Markus

Office: Laufzeitfehler 3061 bei Parameterabfrage

Laufzeitfehler 3061 bei Parameterabfrage

Laufzeitfehler 3061 bei Parameterabfrage

Laufzeitfehler 3061 bei Parameterabfrage

Laufzeitfehler 3061 bei Parameterabfrage

Laufzeitfehler 3061 bei Parameterabfrage - Similar Threads - Laufzeitfehler 3061 Parameterabfrage

VBA:Laufzeitfehler beim Einlesen in Variable

Datenbank bleibt gesperrt - laccdb wird nicht gelöscht

Access Laufzeitfehler 3048

Laufzeitfehler 9 VBA

VBA Laufzeitfehler 9

[VBA] .Documents.Open -> Laufzeitfehler 91

Laufzeitfehler 3061