模板
教程
环境
性能
功能
管理
读取Access数据库表名实例
发表于：2007-06-07来源：作者：点击数：
标签：
kendylan 于 8/30/2001 12:28:41 PM 加贴在 Joy ASP ←返回版面： % strConn="DBQ="+server.mappath("kendylan.mdb")+";DefaultDir=;DRIVER={Microsoft A clearcase /" target="_blank" >cc ess Driver (*.mdb)};" set objConn=server.createobject("Adodb.c
kendylan 于 8/30/2001 12:28:41 PM 加贴在 Joy ASP ←返回版面： <%
strConn="DBQ="+server.mappath("kendylan.mdb")+";DefaultDir=;DRIVER={Microsoft Aclearcase/" target="_blank" >ccess Driver (*.mdb)};"
set objConn=server.createobject("Adodb.connection")
objConn.open strConn
set rsSchema=objConn.openSchema(20)
rsSchema.movefirst
Do Until rsSchema.EOF
if rsSchema("TABLE_TYPE")="TABLE" then
response.write rsSchema("TABLE_NAME") & "<br>"
end if
rsSchema.movenext
Loop
set objConn=nothing
%>
（出处：www.mesky.net ）
