读取Access数据库表名实例
今天天气好晴朗处处好风光,好天气好开始,图老师又来和大家分享啦。下面给大家推荐读取Access数据库表名实例,希望大家看完后也有个好心情,快快行动吧!
%
strConn="DBQ="+server.mappath("kendylan.mdb")+";DefaultDir=;DRIVER={Microsoft Access 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
%