方法二：

Access 系統(tǒng)表 MsysObjects 包含了數(shù)據(jù)庫對(duì)象列表。盡管未在文檔中記載，你仍可通過查詢它來獲取你想要的。但是默認(rèn)情況下無法操作系統(tǒng)表，必須手動(dòng)設(shè)定權(quán)限收才能查詢系統(tǒng)表。

請(qǐng)參考以下動(dòng)畫：如何獲取對(duì)msysobject的操作權(quán)限

http://access911.net/eg/swf/msobject.swf

警告：不要修改任何ACCESS系統(tǒng)表，否則會(huì)出現(xiàn)不可意料的情況.

使用下列 SQL 語句來獲取你想要的

查詢:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)=5 ORDER BY MSysObjects.Name;

窗體:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)=-32768 ORDER BY MSysObjects.Name;

表:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (Left$([Name],4) <> "Msys") AND (MSysObjects.Type)=1 ORDER BY MSysObjects.Name;

報(bào)表:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32764 ORDER BY MSysObjects.Name;

模塊:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32761 ORDER BY MSysObjects.Name;

宏:

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32766 ORDER BY MSysObjects.Name;