Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Anders (software)

fout in access sql opdracht ????

johan kruize
7 antwoorden
  • In access 2000 is het de bedoeling dat na het indrukken van een opdrachtknop de volgende sql wordt uitgevoerd :

    Public Sub query_uitvoeren_Click()
    On Error GoTo Err_query_uitvoeren_Click

    Dim stDocName As String
    Dim db As Database

    Set db = CurrentDb()


    tezoekenwaarde = "nummerdrie"

    db.Execute " SELECT [uitkomsten tabel].omschrijving, [uitkomsten tabel].uitkomst" & _
    " FROM [uitkomsten tabel] WHERE ((([uitkomsten tabel].omschrijving)=tezoekenwaarde))"

    —–hierna nog een klein stukje code voor de fouafhandeling en de end sub

    ik krijg dan de foutmelding : kan selectiequery niet uitvoeren

    Iemand enig idee wat hier fout gaat ????

    Ook als ik de voorwaarde ("nummerdrie" dus) in de sql opdracht ingeef krijg ik de zelfde melding..



    Misschien kun je dan ook nog het volgende probleem oplossen :
    Wat ik graag wil is dat een variable de waarde krijgt van een veld gevonden in de bovengenoemde query. Iemand en idee hoe dat eenvoudig is op te lossen zonder uitgebreide programmering
  • deze code is volgens mij ook bruikbaar:
    [code:1:9ce0bf59da]Dim waarde As Variant
    waarde = DLookup("uitkomst", "uitkomsten tabel", "omschrijving = " & tezoekenwaarde)
    [/code:1:9ce0bf59da]
    Wim
  • Dank Wim, ik had m'n hoop al op je gevestigd. Het tweede deel van m'n vraag is hiermee beantwoord (moest nog wel even met wat " en ' stoeien) . Maar ik wil toch graag weten wat er mis is met m'n sql, want ik moet dus een query draaien met de uitkomst van de tweede opdracht.
  • Ik gebruik altijd :
    DoCmd.RunSQL ………….

    bv:
    DoCmd.RunSQL "UPDATE Werknemers " & _
    "SET Werknemers.Functie = 'Regionale verkoopmanager " & _
    "WHERE Werknemers.Functie = 'Verkoopmanager;"

    foutje?
    Volgens mij kan de code welke tussen "" staat de variable tezoekenwaarde niet herkennen. probeer iets van onderstaand voorbeeld.
    Ik kan het moeilijk testen zonder tabel.

    db.Execute " SELECT [uitkomsten tabel].omschrijving, [uitkomsten tabel].uitkomst" & _
    " FROM [uitkomsten tabel] WHERE ((([uitkomsten tabel].omschrijving)= " & tezoekenwaarde & "))"


    Groeten,
    Wim
  • kom er niet uit krijg met deze opdracht :
    DoCmd.RunSQL "SELECT [uitkomsten].[omschrijving]FROM uitkomsten;"

    al de foutmelding : a runsql action requires an argument consisting of an sql statement.

    de sql opdracht heb ik rechtstreeks gekopieerd uit een gewone query.


    Ik hoef toch geen aparte references te laden ???
  • in de help van :
    SQLUitvoeren (RunSQL), actie

    Staat dat er wel een actie uit moet volgen, dus
    Tabelmaakquery SELECT…INTO

    In jou code staat geen INTO.
    bv:
    SELECT uitkomsten.omschrijving INTO aaa
    FROM uitkomsten
    WHERE (((uitkomsten.omschrijving) Like tezoekenwaarde));

    deze werkt wel:
    Dim tezoekenwaarde As String
    tezoekenwaarde = "*een*"
    DoCmd.RunSQL "SELECT uitkomsten.omschrijving INTO aaa FROM uitkomsten WHERE (((uitkomsten.omschrijving) Like " & "'" & tezoekenwaarde & "'" & "))"


    Wat moet er eigelijk gebeuren met de SQL code?
    m.a.w. wat moet de code uitvoeren?

    Wim
  • db.Execute "SELECT omschrijving, uitkomst FROM uitkomsten tabel WHERE omschrijving='" & tezoekenwaarde & "'"

    Deze moet het doen.

    Ik geef je wel de tip om tabelnamen als een heel woord te benoemen, dus geen spatie.

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.