用户ASP中读出数据库名，表名，和字段名SQL的也行-优快云博客

本文链接：https://blog.youkuaiyun.com/haimaa/article/details/83465206

本文介绍了如何使用ASP脚本从Access、SQL Server及Oracle数据库中读取表名的方法。通过创建ADODB.Connection对象并连接到指定数据库，利用OpenSchema方法获取数据库的表结构信息，并输出每个表的名称和类型。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

<%'---------------读access库中的表名-------------------------


 set conn=server.createobject("adodb.connection")
 connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("www.yy66.net.mdb")

 conn.open connstr

 Set rstSchema=Conn.OpenSchema(20)

 Do Until rstSchema.EOF
 Response.Write"Table name:"& rstSchema(2)&" "& "Tabletype:"& rstSchema(3)&" "
 rstSchema.MoveNext
 Loop
 %>

<%'---------------读sql server库中的表名-------------------------
 SET Conn=Server.CreateObject("ADODB.Connection")
 Conn.Open "Server=IP地址;Provider=sqloledb;Database=库名称;UID=用户名;PWD=密码;"
 Set rstSchema=Conn.OpenSchema(20)

 Do Until rstSchema.EOF
 Response.Write "Table name:"& rstSchema(2)& " "& "Table type:"& rstSchema(3)& " "
 rstSchema.MoveNext
 Loop
 %>

 <%'---------------读oracle库中的表名-------------------------
 SET Conn=Server.CreateObject("ADODB.Connection")
 Conn.Open "Provider=MSDAORA.1;Password=密码;User ID=用户名;Data Source=数据源名称"
 Set rstSchema=Conn.OpenSchema(20)

 Do Until rstSchema.EOF
 Response.Write "Table name:"& rstSchema(2)& " "& "Table type:"& rstSchema(3)& " "
 rstSchema.MoveNext
 Loop
 %>