获得Access数据中的所有用户的表名

Question

你不能看一下其help吗,或得找msdn 看一下不就行了吗！

Answer 1

用adoconnection.gettablesname;取得某个数据库中的表名；adoquery1.selectedfield.datatype;取得某个表中的某个字段的字段类型

Answer 2

对了，现在使用GetTableNames函数得到用户表名已经解决，现在主要是如何使用OpenSchema方法。

Answer 3

现在Delphi下ADO的OpenSchema方法使用情况，已经解决拿出来与大家共享：
Con: OleVariant;
Rec: OleVariant;Con := CreateOleObject('ADODB.Connection');
Con.ConnectionString := 'DSN = ' + DataSourceName;
Con.Open;Rec := CreateOleObject('ADODB.Recordset');
Rec := Con.OpenSchema(siTables);
或者
Rec := Con.OpenSchema(siColumns);然后就是对数据集操作了。