[Access] Query met conditie uit formulier

[Drop]

Wie kan mijn vertellen wat hier in Access niet goed gaat.

SELECT *
FROM tabelletje
WHERE [dropdown] LIKE '*'+[tekst]+'*';

Vanuit een formuliertje start ik deze query. Uit een tekstveld haal ik de waarde die moet matchen en uit een dropdown de naam van het veld dat moet matchen.

.... maar dat werkt dus niet. Als ik in de query [dropdown] weghaal en er een veldnaam neerzet werkt ie wel.

<heel vaag>
Kennelijk komt de waarde van de dropdown niet goed bij de query terecht terwijl die van het tekstveld er wel goed aan komt. Wat is er niet goed?
</heel vaag>

[Boss]

Misschien een dropdown met 2 kolommen, waarvan 1 onzichtbaar?

[Verwijderd]

Eh, je weet dat na een WHERE clause altijd een KOLOMNAAM komt (en geen veld)? Dus ik weet niet precies wat je met [dropdown] bedoeld, maar als dat iets uit een dropdown-menuutje is, dan klopt dat logischerwijs niet in de query...

[Crazy D]

Op vrijdag 05 oktober 2001 23:38 schreef Drop het volgende:
SELECT *
FROM tabelletje
WHERE [dropdown] LIKE '*'+[tekst]+'*';

Probeer eens iets als

code:

Dim sql as String
sql = "SELECT * FROM Tabelletje "
sql = sql & "WHERE " & dropdownbox.text & " LIKE '*" & tekstveld.Text & "*';"

En wat je daarna met die sql string doet verzin je zelf maar

[Drop]

Op zaterdag 06 oktober 2001 02:11 schreef typhon het volgende:
Eh, je weet dat na een WHERE clause altijd een KOLOMNAAM komt (en geen veld)?Dus ik weet niet precies wat je met [dropdown] bedoeld....

Met [dropdown] bedoel ik de waarde van een keuzelijst. Deze keuzelijst bevat de kolomnamen van 'tabelletje'. Dus na de WHERE clause staat netjes een kolomnaamnaam... maar dat werkt dus niet.

Het probleem moet aan de query liggen, want [dropdown] bevat <getest>wel</getest> de juiste geselecteerde waarde uit de keuzelijst.

[Amplify]

Ik zit dus met hetzeflde probleem.
Op Dit moment heb ik echter wel een omslachtige oplossing, maar op dit moment naar mijn idee de enige.

Maak Van elke kolomnaam een aparte Query. Voor elke veldnaam een. Dan zorg je met VB-Code ervoor dat als de Uitvoer knop indrukt wordt de juiste Query wordt uitgevoerd.

code:

Option Compare Database

Private Sub zoek_Click()
On Error GoTo Err_zoek_Click

    ResultField.SourceObject = "Query." & Klijst.Value
     
    'Resultaten worden in dit voorbeeld weergeven in een subformulier.
    'Anders:
    'Dim Var
    'Var = "Query." & Klijst.Value
    'DoCmd.OpenQuery Var
    
Exit_zoek_Click:
    Exit Sub

Err_zoek_Click:
    MsgBox Err.Description
    Resume Exit_zoek_Click
    
End Sub

[Verwijderd]

gebruik LIKE '%tekst%' ipv *.....*