-
Oct 27th, 2000, 07:46 AM
#1
Thread Starter
Lively Member
Hi,
I have the following function in my application
Print_Statement
Dim appAccess as Access.Application
Set appAccess = New Access.Application
appAccess.OpenCurrentDatabase _
("G:\Wiz Add Ins\Energy Client\Database\Energy Client.mdb")
appAccess.DoCmd.OpenReport _
("rptStatement", acViewPreview, , "[Date] = #" & Date & "#")
This should return the report displaying only the data for the current date, however it returns no records at all.
I had the same problem using the FindFirst Method recently and had to search records manually to find my data.
This is not an option this time as the OpenReport command requires this WHERE clause like string.
Any suggestions would be much appreciated as my application is now finished and I only have the reports left to configure.
Best regards,
Rob Brown.
-
Oct 27th, 2000, 09:07 AM
#2
Fanatic Member
Dates
I have tried this and it does work - all I can suggest is that you explicitly format the date using Format(Date(), "ddmmyyy") or whatever.
Are you getting US style dates back? Try setting your date to 10th October (10/10) and ensuring it works then. Dates are a bu**er though.
Cheers,
Paul.
Not nearly so tired now...
Haven't been around much so be gentle...
-
Oct 27th, 2000, 01:02 PM
#3
Lively Member
you might try this
Code:
("rptStatement", acViewPreview, , "[Date] = " & clng(Date) )
-
Oct 30th, 2000, 06:16 AM
#4
Thread Starter
Lively Member
Problem solved,
Although the Date function was printing in the immediate window as DD/MM/YY it must have contained other information also.
I found myself having to use:
Format(Date, "Short Date")
this works fine.
Thanks for your suggestions anyway.
Best regards,
Rob Brown.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|