bij een knop om een rapport af te drukken heb ik
2 velden : Vandatum en Totdatum
Private Sub Knop4_Click()
DoCmd.SetParameter "van", Vandatum
DoCmd.SetParameter "tot", Totdatum
DoCmd.OpenReport "rapport alle kosten", acViewPreview
End Sub
het rapport alle kosten is gebaseerd op een query
PARAMETERS [van] DateTime, [tot] DateTime;
SELECT [tabel rekeningnummers].[soort kost], [tabel kosten].Datum, [tabel betaalwijzen].Betaalwijze, [tabel kosten].omschrijving AS [tabel kosten_omschrijving], [tabel kosten].bedrag
FROM [tabel rekeningnummers] RIGHT JOIN ([tabel betaalwijzen] RIGHT JOIN [tabel kosten] ON [tabel betaalwijzen].[Id] = [tabel kosten].[id betaalwijze]) ON [tabel rekeningnummers].[Id] = [tabel kosten].[id rekeningnr]
WHERE ((([tabel kosten].Datum)>=[van] And ([tabel kosten].Datum)<=[tot]))
ORDER BY [tabel rekeningnummers].[soort kost], [tabel kosten].Datum, [tabel betaalwijzen].Betaalwijze;
maar het werkt niet
de parameters worden niet doorgegeven
2 velden : Vandatum en Totdatum
Private Sub Knop4_Click()
DoCmd.SetParameter "van", Vandatum
DoCmd.SetParameter "tot", Totdatum
DoCmd.OpenReport "rapport alle kosten", acViewPreview
End Sub
het rapport alle kosten is gebaseerd op een query
PARAMETERS [van] DateTime, [tot] DateTime;
SELECT [tabel rekeningnummers].[soort kost], [tabel kosten].Datum, [tabel betaalwijzen].Betaalwijze, [tabel kosten].omschrijving AS [tabel kosten_omschrijving], [tabel kosten].bedrag
FROM [tabel rekeningnummers] RIGHT JOIN ([tabel betaalwijzen] RIGHT JOIN [tabel kosten] ON [tabel betaalwijzen].[Id] = [tabel kosten].[id betaalwijze]) ON [tabel rekeningnummers].[Id] = [tabel kosten].[id rekeningnr]
WHERE ((([tabel kosten].Datum)>=[van] And ([tabel kosten].Datum)<=[tot]))
ORDER BY [tabel rekeningnummers].[soort kost], [tabel kosten].Datum, [tabel betaalwijzen].Betaalwijze;
maar het werkt niet
de parameters worden niet doorgegeven