Methode 1: Verwenden Sie die OpenSchema () -Methode von ADO, um Adschematable zu öffnen und einen Schema -Datensatz zu erstellen
Code:
<%
Constadschematables = 20
adschemacolumns = 4
Dimconn, db
Dimconnstr
db = "temp.mdb" 'Zugriffsdatei -Dateiname, bitte verwenden Sie den absoluten Pfad relativ zum Stammverzeichnis der Website
ConnStr = "Provider = microsoft.jet.oledb.4.0; dataSource =" & server.mappath (DB)
SetConn = server.createObject ("adodb.Connection")
Conn.openconnstr
Dimrstschema
Düster
SetRstSchema = conn.openschema (Adschematables)
Dowhilenottrstschema.eof
response.write ("tableName:" & rstschema ("table_name") & vbcr & _
"Tabletype:" & RSTSCHEMA ("TABLE_TYPE") & VBCR)
response.write ("<br/>")
I = i+1
RSTSCHEMA.MOVENEXT
Schleife
RSTSCHEMA.CLOSE
conn.close
%>
Methode 2: Zugriff auf Systemtabelle MSYSObjects enthält eine Liste von Datenbankobjekten. Obwohl nicht in der Dokumentation dokumentiert, können Sie immer noch das erhalten, was Sie wollen, indem Sie es abfragen. Standardmäßig kann die Betriebssystemtabelle nicht betrieben werden, und die Berechtigungen müssen manuell eingestellt werden, um die Systemtabelle abzufragen.
Weitere Informationen finden Sie in der folgenden Animation: So erhalten Sie Betriebsberechtigungen für msysObject http://blog.iyi.cn/user/david/archives/images/msobject.swf
Ich kann diese Systemtabellen jedoch nicht in Access2003 finden. Ich weiß nicht, ob M $ die Sicherheit von Access verbessert.
Verwenden Sie die folgende SQL -Anweisung, um das zu erhalten, was Sie wollen
Code:
Abfrage:
SelectSysObjects
Bilden:
SelectSysObjects
Oberfläche:
SelectSysObjects
Bericht:
SelectSysObjects
Modul:
SelectSysObjects
Makro:
SelectSysObjects