asp 获取access系统表，查询等操作代码-巨人网络通讯

主页 > 知识库 > asp 获取access系统表，查询等操作代码

asp 获取access系统表，查询等操作代码

方法一：直接用ado的OpenSchema()方法打开adSchemaTables，建立一个schema记录集

Code:
%
Const adSchemaTables = 20
adSchemaColumns = 4
dim Conn,db
dim ConnStr
db="temp.mdb"       'ACCESS数据库的文件名，请使用相对于网站根目录的的绝对路径
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="  Server.MapPath(db)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr

Dim rstSchema
Dim I

Set rstSchema = Conn.OpenSchema(adSchemaTables)

Do while not rstSchema.EOF
  response.write("Table name: " rstSchema("TABLE_NAME")  vbCr  _
  "Table type: "  rstSchema("TABLE_TYPE")  vbCr)
response.write("br/>")
I = I + 1
rstSchema.MoveNext
Loop
rstSchema.Close

conn.Close
%>

方法二：Access 系统表 MsysObjects 包含了数据库对象列表。尽管未在文档中记载，你仍可通过查询它来获取你想要的。但是默认情况下无法操作系统表，必须手动设定权限收才能查询系统表。
请参考以下动画：如何获取对msysobject的操作权限 http://blog.iyi.cn/user/david/archives/IMAGES/msobject.swf

但是我在access2003中找不到这几个系统表，不知道是不是m$增强了access的安全性。

使用下列 SQL 语句来获取你想要的

Code:
查询:
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;

报表:
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;

您可能感兴趣的文章:

access数据库的一些少用操作,ASP,创建数据库文件,创建表,创建字段,ADOX
ASP ACCESS 日期操作语句小结 By Stabx
Asp 操作Access数据库时出现死锁.ldb的解决方法
asp.net(C#) Access 数据操作类
asp实现的查询某关键词在MSSQL数据库位置的代码
asp 在线备份与恢复sqlserver数据库的代码
asp终极防范SQL注入漏洞
asp连接mysql数据库详细实现代码
asp连接access、sql数据库代码及数据库操作代码
asp操作access提示无法从指定的数据表中删除原因分析及解决
ASP中巧用Split()函数生成SQL查询语句的实例
asp执行带参数的sql语句实例
ASP 连接 SQL SERVER 2008的方法
ASP通过ODBC连接SQL Server 2008数据库的方法
ASP语言实现对SQL SERVER数据库的操作

标签：衡水广元枣庄江苏衢州萍乡大理蚌埠

巨人网络通讯声明：本文标题《asp 获取access系统表，查询等操作代码》，本文关键词；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。

asp 获取access系统表，查询等操作代码

QQ咨询

电话咨询