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;



相关阅读:
IE8 原生JSON支持
MYSQL教程:缓慢的drop table 操作
AJAX在移动领域威胁到Java ME了么?
调整“Oracle”数据库服务器的性能
javascript数组使用调用方法汇总
用Jquery实现多级下拉框无刷新的联动
PHP Ajax实现页面无刷新发表评论
用vbs遍历文件并随机显示的脚本
CSS教程:CSS3新功能和新特性
AJAX框架JSON-RPC-Java 1.0rc2 发布
让GridView只更新某些特定的数据的方法
js日历功能对象
利用正则快速找出两个字符串的不同字符
CSS大师Eric采访实录
快速导航
PHP MySQL HTML CSS JavaScript MSSQL AJAX .NET JSP Linux Mac ASP 服务器 SQL jQuery C# C++ java Android IOS oracle MongoDB SQLite wamp 交通频道 作文范文 寒香 描写扳手腕大赛的作文600字 人生哲理小故事:不要怕,不要悔 初中初三作文800字:五颜六色的我 民主生活会领导干部发言稿三则 2015湖南高考零分作文:那棵树,我种的 安慰失恋的句子 这一生就当未曾相识 默默的栀子花 公司2015年下半年工作计划 山东省初中作文公开课“如何使内容具体生动”优秀教案 一个真正的共产党员_事迹材料 自己小说其中的一章,哦呵呵~~~(转载)作文1100字 汽车的好与坏(English)作文300字 饭店开业答谢词 励志故事及感悟 春雨中的小院 记忆中的永恒800字 学院治理商业贿赂承诺书 我心目中的美好家园 爱到浪漫,是刚开始 2014除夕个性祝福语 学生的苦作文550字 小学五年级作文1500字:断了的弦 湿地-生态梦实践团进行色度与浊度的检测 法院思想作风整顿个人剖析材料 《一步之遥》经典语录大全 想你已是一种习惯 读《谁动了我的奶酪》有感作文1500字 且行发表日志:这个假期不再有你,心里空荡荡 念你,幸福 如果你碰到了这种男生,就把自己嫁了吧!不然就被别的女生抢走了哦 这地球怎么呢? 新闻专业毕业生求职求职信 谈判会议记录格式 党十八届六中全会精神感悟 希望作文200字 赞美学校的好段 开展创建无毒县活动总结 你必须为你的选择负责 我们自己选择了现实 透析企业管理与信息的关系 成熟地看待人生,让自己今后的路走得更好 冬季的约定 新环境保护法学习心得(精选3篇) 交通局纪委科学发展观分析检查报告 有关于爱情的散文 我爱我家 冯新和 09年3月份大一学生入党申请书范文 我的倒霉暑假 身为过客,何必伤怀

Copyright © 2016 phpStudy |