PDA

Vollständige Version anzeigen : SQL und Treeview


Verena04
29.09.2005, 14:55
Hallo Zusammen,

ich habe folgendes Problem:

Ich habe einen SQL String um daraus meinen Tree View aufzubauen. Es kommt immer die Fehlermeldung " 1 Parameter wurde erwartet, aber es wurden zu wenig Parameter übergeben" an der Stelle " Set rst = CurrentDb.OpenRecordset(strTableQueryName, dbOpenDynaset, dbReadOnly)
". Woran könnte das liegen. Beim Debuggen habe ich festgestellt, dass der richtige Name im Kombofeld eingetragen ist.


Dim strTableQueryName As String
Dim rst As DAO.Recordset
Dim nde As Node
Dim temp As String


Me.acxTreeView1.Nodes.Clear

strTableQueryName = "SELECT Neu_Orgahierarchie.*, " _
& "(SELECT Count(*) FROM Neu_Mitarbeiter_Projekt WHERE MitName = " & Me.Kombinationsfeld62.Value & " And PROJNR_Zahl = ID)<>0 AS [KdHatProdukt] " _
& "FROM Neu_Orgahierarchie;"

Set rst = CurrentDb.OpenRecordset(strTableQueryName, dbOpenDynaset, dbReadOnly)

AddBranch4 Me.NAME, "acxTreeView1", rst, "[ID_Parent]", "[ID]", "[Bezeichnung]", , , "[KdHatProdukt]"

End Sub


Vielen Dank und Grüße

Arne Dieckmann
29.09.2005, 15:00
Wenn das Feld "MitName" ein Textfeld (s. Tabellenentwurf) ist, muss das Kriterium in Hochkommata gesetzt werden.

Verena04
29.09.2005, 15:09
Ich habe MitName in Hochkommas gesetzt, kommt jedoch immer noch die gleiche Fehlermeldung:


strTableQueryName = "SELECT Neu_Orgahierarchie.*, " _
& "(SELECT Count(*) FROM Neu_Mitarbeiter_Projekt WHERE 'MitName' = " & Me.Kombinationsfeld62.Value & " And PROJNR_Zahl = ID)<>0 AS [KdHatProdukt] " _
& "FROM Neu_Orgahierarchie;"


Danke und Grüße

Arne Dieckmann
29.09.2005, 15:12
Nur das Kriterium in Hochkommata!

Hier nur der fragliche Abschnitt:
...WHERE MitName = '" & Me!Kombinationsfeld62 & "' And ...

Verena04
29.09.2005, 15:13
Super Danke!!!