Waarde van veld uit query halen

[johanw]

Ik heb dus even een nieuw formulier aangemaakt om die OnCurrent functie te testen.

Heb hem gekoppeld aan een tabel.

1 Veld erin gezet genaamd Veld1

en dit Vbscript

Private Sub OnCurrent()

Veld1.Value = 1

End Sub


Zou toch moeten werken zo dacht ik? Doet het dus niet..

 

[Bartuls]

OK,

Terug naar af.
Wat wil je nu precies dat er wanneer gebeurt?

 

[johanw]

Oke zal het zo duidelijk mogelijk proberen uit te leggen.

Ik heb een formulier, daarin staan velden, de waarden van die velden worden uit een tabel gehaald.

Onder die velden bevinden zich de velden Compaq_PN_1 tm Compaq_PN_15 naast die velden staan velden waarin de omschrijving van Compaq_PN_1 tm Compaq_PN_15 moeten staan. Die omschrijving moet uit een andere tabel door te zoeken op het Compaq_PN uit die tabel.

 

[Bartuls]

Kijk, nu is het duidelijk.

Ik heb even een voorbeeldje voor je gemaakt.

 

[johanw]

ik denk dat het nu wel gaat lukken!

 

[johanw]

Het is me nog niet helemaal gelukt, ik gebruik dit, wat eigenlijk hetzelfde is als jouw voorbeeld (Ik heb het geprobeerd in jouw voorbeeld formulier)

=DFirst("Omschrijving";"tbl_magazijn";"ID = fld_compaq_pn_2")

Het veld waarin ik dit zet krijgt nu de waarde #error.

Maar ik krijg geen foutmelding.. Waar kan ik de foutmelding zien?

 

[Bartuls]

In mijn voorbeeld stond dit:

=DFirst("fldVeld";"Tabel2";"IDTabel1=" & CStr([Forms]![frmTest]![txtID]))

Je fout zit in dit deel:

"ID = fld_compaq_pn_2"

Dit is de WHERE clausule van het SELECT statement dat Access voor je genereerd.

Waar naar gezocht wordt is een record met in het veld ID de waarde fld_compaq_pn_2.
Ik heb zo'n vermoeden dat dat in geen enkel record voorkomt.
Ik neem even aan dat ID een numeriek veld is.
Je moet er dus voor zorgen dat de conditie correct is.

"ID = " & cstr(een expressie die een numerieke waarde teruggeeft)

Aangezien je niet aangeeft waar fld_compaq_pn_2 vandaan moet komen (formulier bijvoorbeeld) kan ik die expressie niet voor je voor je maken.

 

[johanw]

ID is in mijn geval GEEN integer.. Daar ligt dacht ik ook de fout.

Ben nu bezig met Dlookup, misschien wil dat wel..

 

[johanw]

Heb eens even wat gestoeid met de syntax..

=DFirst("Omschrijving";"tbl_magazijn";"[ID] = [txt_compaq_pn_2]")

Werkt wel

dus:

=DFirst("veld";"tabel";"[fld_id] = [txt_id]")

Bedankt voor je hulp en voorbeeldje Bartuls! :thumb: