没有合适的资源?快使用搜索试试~ 我知道了~
温馨提示
试读
1页
方法一:直接用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(“A
资源推荐
资源详情
资源评论
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,创建数据库文件,创建表,创建字段,ADOXASP ACCESS 日期操作语
句小结 By StabxAsp 操作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数据库的操作
资源评论
weixin_38668672
- 粉丝: 6
- 资源: 907
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功