M$Access - MSysObjects no read permission for ADO 1

[TimSNL]

Hello everyone.

Seeking your valuable advice again. I need to get a list of table names from my Access97 database. I am using dbExpress components to access the database from Delphi6.

I have the query:

SELECT Name FROM MSysObjects where Type = 1 AND NAME NOT IN ("MSysObjects","MSysACEs","MSysQueries","MSysRelationships","MSysAccessObjects")

This query works fine in the Access Query Builder.
When I try and use this query in my Delphi program I get:
"MSysObjects: no read permissions for ADO"

Does anyone know how I can get around this permissions problem?
Or is there a better way to get a list of table names?

Thanks for your help.
Tim
SNL Computing

 

[Oppenhiemer]

IM not sure how exactly to do it using the DBExpress components alone, but you can do it using the BDE components.

By using the TDatabase component, you can call the "getTableNames" function. This should give you what you need.

Opp.

 

[TimSNL]

Thanks Opp.
getTableNames was just what I needed