[Access] Nieuwe uitdaging voor mij.

[urk_forever]

Ik heb weer een nieuwe uitdaging in access. Ik heb dit formulier gemaakt:



Nu is het de bedoeling dat als ik in de combo box een waarde aanklik er de waardes bijgezocht worden.
Dus zet ik de waarde van de combo box in een variabele en probeer het volgende:

code:

CurrentDb.Execute "Select * from typenr where componentnr = compnrvar"

Alleen vind access dit niet zo leuk. Kan iemand me hier op weg helpen?

[Verwijderd]

Volgens mij probeer je nu VB met SQL te mengen. En je plaatje is eenmooi rood kruisje bijdeweg.

[Verwijderd]

Op dinsdag 22 januari 2002 10:24 schreef urk_forever het volgende:
Ik heb weer een nieuwe uitdaging in access. Ik heb dit formulier gemaakt:

[afbeelding]

Nu is het de bedoeling dat als ik in de combo box een waarde aanklik er de waardes bijgezocht worden.
Dus zet ik de waarde van de combo box in een variabele en probeer het volgende:

code:

CurrentDb.Execute "Select * from typenr where componentnr = compnrvar"

Alleen vind access dit niet zo leuk. Kan iemand me hier op weg helpen?

Ik kan het plaatje niet zien wat je waarschijnlijk gepost hebt maar het probleem is niet zo moeilijk:
Je geeft in een SELECT statement je variabele mee in stringvorm. Access gaat dit niet zelf voor je interpreteren.
Een voorbeeld

code:

  Dim strNaam As String
  strNaam = "urk_forever"
  CurrentDb.Execute "SELECT * FROM GoT WHERE Naam=strNaam"

Dit zal door Access niet worden begrepen aangezien je nu eenvoudig weg strNaam zelf meegeeft (niet de waarde van de beschreven variabele).
Dit zou je moeten doen als:

code:

  Dim strNaam As String
  strNaam = "urk_forever"
  CurrentDb.Execute "SELECT * FROM GoT WHERE Naam=""" & strNaam & """"

De dubbele quotes "" zijn er om aan te geven dat het om een string gaat.


Wat je hier vraagt zijn algemene programmeervaardigheden en het lijkt me verstandig om je daar eerst in te verdiepen.

[Delphi32]

Het lijkt me op zich ook niet zo'n goed idee om

code:

CurrentDb.Execute "SELECT *"

te gebruiken. Execute gebruik je voor updates, deletes en inserts (data manipulation), niet voor data retrieval. Waar moet Access z'n result set kwijt?

[urk_forever]

plaatje zou nu moeten werken.

Ik programmeer niet zo heel veel, vroeger wel les in gehad alleen niet zo erg diep op in gegaan. Een database maken is ook niet zo'n heel groot probleem, alleen de dingetjes erbij programmeren gaat soms wat moeilijker

[Verwijderd]

code:

CurrentDb.Execute "Select * from typenr where componentnr = " & compnrvar

Ik ga er even van uit dat:
- componentnr de veldnaam is
- compnrvar de variabele is

[urk_forever]

Op dinsdag 22 januari 2002 10:50 schreef Sepans het volgende:

code:

CurrentDb.Execute "Select * from typenr where componentnr = " & compnrvar

Ik ga er even van uit dat:
- componentnr de veldnaam is
- compnrvar de variabele is

yep

[chem]

Op dinsdag 22 januari 2002 10:29 schreef Gregole het volgende:
[..]

En je plaatje is eenmooi rood kruisje bijdeweg.

wat is access lelijk zeg

[urk_forever]

Op dinsdag 22 januari 2002 11:02 schreef chem het volgende:

[..]

wat is access lelijk zeg

Dat plaatje werkt anders allang al

[urk_forever]

Ik heb er eens een vreselijk dik Access 2000 boek bijgepakt (Access 2000 Developers handbook set) waar ik het volgende tegenkwam:



Ik ga dit proberen om te bouwen naar mijn eigen formulier want dit is net wat ik nodig heb! Alleen zit er nogal wat code achter.

[Verwijderd]

Op dinsdag 22 januari 2002 11:05 schreef urk_forever het volgende:

[..]

Dat plaatje werkt anders allang al

Dat plaatje bevestigd alleen maar dat Access nog lelijker is als verwacht

[Verwijderd]

Ik weet niet echt wat je wilt bereiken met dat SQL Scratch scherm, lijkt me een leuke gadget. Maar volgens mij wilde je gewoon in een subformulier alleen de records zien die overeenkomen met de gekozen waarde in de combobox. Dat doe je in Access gewoon met een filter.

Stel: het veld in je subformulier waarop je wilt filteren heet (origineel!) Veld1 en de combo met filtergegevens heet Combo1. Je raadt al hoe je subformulier heet: Subform1. Dan zou je in het AfterUpdate-event van je combobox de volgende code kunnen zetten:

code:

Me.Subform1.Filter = "Veld1 = " & Me.Combo1
Me.Subform1.FilterOn = True

[urk_forever]

Op dinsdag 22 januari 2002 15:35 schreef hvdberg het volgende:

[..]

Dat plaatje bevestigd alleen maar dat Access nog lelijker is als verwacht

[urk_forever]

vraagje wat zou dit voor waarde op moeten leveren als compnrvar 1 (dus eigenlijk typenrcombo.value = 1)is?

code:

compnrvar = typenrcombo.Value
temp = "Select * from componenten where componentnr = "
temp1 = """& temp &""" & """& compnrvar &"""

[urk_forever]

Te moeilijk voor jullie

[Boss]

Ja, dat is het. We kunnen het niet meer volgen. Strings gebruiken in SQL statements... pfffff... moet dit niet naar advanced programming & webscripting

[urk_forever]

Op dinsdag 22 januari 2002 20:57 schreef Boss het volgende:
Ja, dat is het. We kunnen het niet meer volgen. Strings gebruiken in SQL statements... pfffff... moet dit niet naar advanced programming & webscripting

ik wil alleen maar die sql commando combineren met een variabele maar dat lukt dus niet

[RobzQ]

Op dinsdag 22 januari 2002 16:16 schreef urk_forever het volgende:
vraagje wat zou dit voor waarde op moeten leveren als compnrvar 1 (dus eigenlijk typenrcombo.value = 1)is?

code:

compnrvar = typenrcombo.Value
temp = "Select * from componenten where componentnr = "
temp1 = """& temp &""" & """& compnrvar &"""

Waarom niet iets van :

code:

"Select * from componenten where componentnr = " & str(compnrvar)

[urk_forever]

Op dinsdag 22 januari 2002 21:27 schreef RobzQ het volgende:

[..]

Waarom niet iets van :

code:

"Select * from componenten where componentnr = " & str(compnrvar)

Dank u, o grote wijze programmeerder