[access/vba] Kan ik hier ook SQL in gebruiken??

Pagina: 1
Acties:

  • Hu9o
  • Registratie: Mei 2001
  • Laatst online: 15:36

Hu9o

Schokkend

Topicstarter
Ik wil in de variabele BLAAT zetten wat er in de tabel TEST onder NAAM staat.

Ik heb dit al geprobeerd doormiddel van:
blaat = select t.naam from test t where blaat = t.id

maar, zoals ik al verwacht had, werkt dit niet. Heeft iemand een idee hoe ik dit kan realiseren?? Ik ben zelf niet zo thuis op access gebied.

Alvast bedankt.

>>>>>>>>>>>>>>>>>>>>>>>>>Vertel Microsoft over dit probleem <<<<<<<<<<<<<<<<<<<<<<<<<


Verwijderd

zo doe ik dat :

Set cnn = CurrentProject.Connection
Dim sqlstring As String
Dim rst As New ADODB.Recordset

sqlstring = "SELECT * from test WHERE blaat = t.id;"
rst.Open sqlstring, cnn, , adLockReadOnly, adCmdText
if not rst.eof then
blaat = rst!naam
end if
rst.close

  • Boss
  • Registratie: September 1999
  • Laatst online: 15:14

Boss

+1 Overgewaardeerd

Kan met een functie: dlookup.
blaat = dlookup("veld", "tabel", "where")

The process of preparing programs for a digital computer is especially attractive, not only because it can be economically and scientifically rewarding, but also because it is an aesthetic experience much like composing poetry or music.


  • Hu9o
  • Registratie: Mei 2001
  • Laatst online: 15:36

Hu9o

Schokkend

Topicstarter
Op donderdag 15 november 2001 20:03 schreef Boss het volgende:
Kan met een functie: dlookup.
blaat = dlookup("veld", "tabel", "where")
Inderdaad, hier mee wil het. Maar ik loop dan toch nog tegen een probleem op.
code:
1
2
3
waarde = Me.Keuzelijst1.Value

blaat = DLookup("[bepalingnaam]", "bepaling", "[bepaling#] = 1")

Dit geeft wel het goede resultaat.
Maar wil ik nu de een veranderen door een variabele.
code:
1
2
3
waarde = Me.Keuzelijst1.Value

blaat = DLookup("[bepalingnaam]", "bepaling", "[bepaling#] = waarde")

Krijg ik een foutmelding waar ik niks van snap. Hoe moet ik het er neer zetten zodat ik bepaling#(sleutel) kan opzoeken bij regel nummer van "waarde"

Waarde levert een getal op (integer), dus hier ligt het probleem niet.

>>>>>>>>>>>>>>>>>>>>>>>>>Vertel Microsoft over dit probleem <<<<<<<<<<<<<<<<<<<<<<<<<


Verwijderd

Op donderdag 15 november 2001 22:14 schreef Hu9o het volgende:
code:
1
2
3
waarde = Me.Keuzelijst1.Value

blaat = DLookup("[bepalingnaam]", "bepaling", "[bepaling#] = waarde")

Krijg ik een foutmelding waar ik niks van snap. Hoe moet ik het er neer zetten zodat ik bepaling#(sleutel) kan opzoeken bij regel nummer van "waarde"

Waarde levert een getal op (integer), dus hier ligt het probleem niet.
je moet het laatste veranderen in :

blaat = DLookup("[bepalingnaam]", "bepaling", "[bepaling#] = " & waarde & "")