Sytse1
Gebruiker
- Lid geworden
- 9 aug 2007
- Berichten
- 584
- Office versie
- miDer
De naam van de tabel is variabel vandaar ik deze naam uit het form haal.
De naam wordt keurig in de de variabele NmTbl gezet.
De volgende selectie query geeft de foutmelding dat de tabelnaam in de variabele niet gevonden wordt?
Wie kan miij vertellen wat er fout aan is.
De naam wordt keurig in de de variabele NmTbl gezet.
De volgende selectie query geeft de foutmelding dat de tabelnaam in de variabele niet gevonden wordt?
Wie kan miij vertellen wat er fout aan is.
Code:
Dim dbs As Database, rst As Recordset
Dim strCriteria As String
Dim NmTbl As String
NmTbl = Forms!F_mj1!IdMw 'Hier staat de tabelnaam
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("SELECT NmTbl.Idmw, NmTbl.DatumenDag, NmTbl.Jaar, NmTbl.SoortVerlof, NmTbl.Uren FROM NmTbl" & _
" WHERE NmTbl.IdMw =" & [Forms]![F_mj1]![IdMw] & " And " & "NmTbl.Jaar = " & [Forms]![F_mj1]![Jaar] & " ORDER BY NmTbl.SoortVerlof", dbOpenDynaset)