怎样读一个库(access,sql等)里的所有表名

Question

adoconnection有GetTableNames函数。

Answer 1

dim TableSet as adodb.recordset 
dim Gconnection as adodb.connection sub getTableName 
   set gconnection=new adodb.connection 
   gConnection.Open "Driver=Microsoft Access driver ( 
*.mdb);UID=;PWD=;DBQ=d:\test.mdb;"      Set TableSet = gConnection.OpenSchema(adSchemaTables, Array(Empty,   Empty, Empty, Empty)) 
   Do Until TableSet.EOF 
        msgbox "表名：" & tableset!table_type &" 表类型：" & TableSet! table_type,vbinformation,"表" 
        TableSet.MoveNext 
   Loop 
end sub

Answer 2

用session也能读出数据库中的表要是sql的话
用sql语句查询sysobjects系统表 这里记录了这个数据库中所用地表，视图，存储过程的信息sql语句应该会吧

Answer 3

dephi语句怎么写啊!对了还有sybase数据库

Answer 4

dephi语句怎么写啊!对了还有sybase数据库

Answer 5

dephi语句怎么写啊!对了还有sybase数据库

Answer 6

可以用两种方法，sql可以直接读sysobjects从中得到表名。也可以用Tdatabase或TAdoConnection的GetTableNames函数