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 交通频道 作文范文 莲花山-八仙筒 吴桥-信阳 卓资东-桑根达来 承德-正定 德州东-滕州东 德惠-大板 高密-民权 宜春-容县 昆明-祁县 营山-南召 鹤壁东-天津西 普兰店-开通 碧州-讷尔克气 高密-光山 海拉尔-光明 杭州-遵义 阳新-紫阳 西安南-子洲 北京西-株洲西 廉江-玉林 潢川-长春 贵溪-吉安 许昌东-尤溪 哲里木-古鲁满汗 长冲-沐滂 南阳-保定 丽水-弋江 襄垣-兴国 龙华-静海 朝阳镇-安图 草河口-铁佛寺 金华-徐州东 兰考-邳州 隆昌-昆明 徐州-太阳升 天津-杨柳青 南京-歙县 余姚北-上虞北 进贤南-义乌 成都东-湖州 潢川-海城 贵港-零陵 穆棱-香坊 高家-巴林 横峰-安康 蚌埠南-南昌西 金山屯-汤旺河 烟台-曲阜 邢台-龙华 锦州南-军粮城北 无锡-潢川 洮南-黄陵南 武威南-天水 藁城-济南东 锦州-怀化 天水-兴平 鹤山-阿木尔 德清西-马鞍山 梁山-永康 徐州东-扶余北 桂林-嘉兴南 嘉善南-萧县北 杭州东-株洲 兰州-徽县 黄羊滩-三关口 门达-金宝屯 南召-宁陵县 鄂州-高碑店 定边-明光 大雁-肇东 哈达阳-九三 燕岗-沙湾 郴州-诸暨 渭南-无锡 白涛-中嘴 青铜峡-略阳 治安-双辽 双流西-双流机场 安顺西-上海虹桥 阳新-武义 郑州哪个物流到宿迁市泗洪县
请问火车列车的d T K Z L 分别表示什么意思
镇江到溧阳的票价钱数,顺便问下天目湖有没有学生票,多少钱?谢谢
问路:天津市南开区鞍山西道时代公寓怎么坐车
梅州到金华的衢州是全程高速吗
南沙群岛问题
赣州到萍乡的客运汽车在萍乡的哪个站停
请问26号T126次火车南充到东莞东凌晨1点40分发车大概要坐多少小时 大概几点到
去看12.24 林宥嘉演唱会 从太仓怎么去
从武汉到河南淮阳怎么坐车 急需
万盛理想国的交通如何坐车方便么
杭州到西藏自驾游_杭州到西藏自驾游
永川到北碚老路的路线以及路程
我国除了柴达木盆地还有什么地方被称为聚宝盆
山西大同到甘肃庆阳坐列车怎么走
可以在攀枝花火车列车站购买异地票吗?
【11year给力】保定团购天语团购雨燕团购,哪里的优惠给力,有团购网站吗
南宁到广州火车
「急」湖州市到紫云小区乘几路车该车停靠站点分别有哪些
哪种快递可以送到安徽省铜陵县内?票价多少钱?
从苏州到泗阳县来安镇怎么坐车
想问问现在从大连到丹东的火车列车还有吗
世界上最古老的石桥到底在哪啊
从山东庆云到天津宝坻大钟镇走那条路最近
从南宁到四川八中市应做到哪在转车到八中市
请问大年三十郑州到杞县客车汽车最晚是几点,在哪个站?
从合肥骆岗机场坐哪个航班可以到成都双流机场机票多少
如何将成都社保转到重庆永川
边防证,未婚证到哪里?怎么办理呀?
南京马群客运站最早到句容的车几点

Copyright © 2016 phpStudy |