problems with report.recordsource

[alfalf]

Hello.

I have one db -> db1.mdb with only one table in it: tbl

Here's my code (under Report_open):

Dim CSQL as String
CSQL = "SELECT * from tbl;"

Dim [green]workjet2[/green] As DAO.Workspace, [blue]contbl[/blue] As DAO.Database
Set workjet2 = CreateWorkspace("NewJetWorkspace", "admin", "a", dbUseJet)
Set contbl = [green]workJET2[/green].OpenDatabase("C:\construction\db1.mdb", False, False, "MS Access")

Report.RecordSource = [blue]contbl[/blue].OpenRecordset(CSQL, dbOpenForwardOnly, dbReadOnly).Name

Me.GroupLevel(0).ControlSource = "accent_name"
Me.GroupLevel(0).SortOrder = False

It connects to db1.mdb but it returns error message:
[red]
Microsoft Jet database ngine cannot find the input table or query 'tbl'. Make sure it exists...
[/red]

What could be the cause?

Any help is appereciated.

 

[hymn]

rename your table tbl is probally reserved

Hope this helps
Hymn

 

[alfalf]

No it's not a problem.

This is actually an example. Real code is the same but I use for example cities_us_pa table name instead.

And same problem appears: ms jet dbengine cannot find cities_us_pa input table...

(in real example, it's another database too).

?
Could it be DAO?
Is my suspection on wrong references possible?
I must say that I have no problem making connections for form lists recordsets, the problem is only on report. Am I missing something?

My references are:
VBA
MS Acc 9.0 Object Library
OLE Automation
MS ADOX 2.1 Objects Library
MS DAO 3.6 Objects Library
MS Win Common Controls 6.0 SP6
MS Common Dialog Controls 6.0 SP3

They're carefully choosen and I use all their objects / methods in my app.

Any help appreciated.