office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

获取Access数据库中所有表或查询的方法

2017-08-29 08:00:00
zstmtony
原创
11983

1. 使用Dao来获取

获取Access数据库中所有表列表

For Each tbl in Currentdb.TableDefs

Msgbox tbl.name

next


获取Access数据库中所有查询列表

For Each qdf in Currentdb.QueryDefs

Msgbox qdf .name

next



2.使用 系统表

获取Access数据库中所有表

SELECT MSysObjects.Name, MSysObjects.Type
FROM MSysObjects
WHERE (((MSysObjects.Type)=1));

获取Access数据库中所有查询

SELECT MSysObjects.Name, MSysObjects.Type
FROM MSysObjects
WHERE (((MSysObjects.Type)=5));


分享