"Bonz099" <Bonz099@[EMAIL PROTECTED]
> wrote in message
news:44EF7C0F-0A9F-4236-A334-66DE3D3AA589@[EMAIL PROTECTED]
> Idealy I would want to build a re****t that would allow me to pass the
> "datesubmitted" to the query for it. But it have no idea where to paste
> this
> code or how to structure the dynamic query.
>
> Would you mind explaining where to put the code and how my query that
the
> form references should look like?
ok...
Lets assume you want to send the results to a re****t.
The user could then
print, or close the re****t when done.
The 1st thing is to build a re****t based on that table. Set all of the
sorting and grouping stuff in the re****t. Get it exactly the way you want.
Note that the re****t will have no parameters and there is little advantage
to
base the re****t on a query. Once that re****ts looks the way you want, then
close it and save it.
Ok...now that our re****t is good, we go back to your continues form, and
the
code behind the button will be:
dim strWhere as string
strWhere = "DateSubmited = #" & format(me!DatesSubmitted,"mm/dd/yyyy") &
"#"
docmd.Openform "MyRe****t",acViewPreview,,,strwhere
So, the code goes behind that button on the continues form you talked
about...
I have assumed that the date on that row when clicked is me!DatesSubmitted
(I you have to change that to the name of the actual date field you used
(can't read minds!!!).
If you allow editing of data in the continues form, then you need to force
a
disk write BEFORE you launch the re****t. Change above to:
dim strWhere as string
strWhere = "DateSubmited = #" & format(me!DatesSubmitted,"mm/dd/yyyy") &
"#"
me.refresh
docmd.Openform "MyRe****t",acViewPreview,,,strwhere
So, it is assumed that the above code goes behind the button your
pressing.
We thus do not have to build a new query for the re****t..but only pass it
the "where" clause to restrict it to whatever we want -- in this case the
one date.....
--
Albert D. Kallal (Access MVP)
Edmonton, Alberta Canada
pleaseNOOSpamKallal@[EMAIL PROTECTED]
|
