office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

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

穫取Access數據庫中所有錶或查詢的方法

2017-08-29 08:00:00
zstmtony
原創
4863

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));


分享