各位大虾：请问有没有打开mdb的代码?不知道表的情况下，有没有可能办法捕获表并打开？？？

Question

当然可以了，
     adoc1.GetTableNames
     adoc1.GetFieldNames

Answer 1

什么意思，是想看到MDB的表吗？

Answer 2

如果用ADO连接,用TADOConnection.GetTableNames可以获得所有的表名称。
如果用TQuery或TTable，需要用TSession控件，设置好属性，用TSession.GetTableNames可以获得所有的表名称。

Answer 3

to  :gzmhero(hihihi)　;GetTableNames好像只对dbase数据库有效，mdb根本就不行。谁还能救救我啊！！！！！

Answer 4

怎么可能呢？你自己再看看吧，adoc1.GetTableNames       得到表名，
    adoc1.GetFieldNames  得到当前表的自段名
返回的是stringlist类型，

Answer 5

终于好了！！！tmd！ADOConnection.Close;
            ADOConnection.ConnectionString:='Driver={Microsoft Access Driver (*.mdb)};DBQ='+m_filename;
            ADOConnection.LoginPrompt:=false;
            ADOConnection.Open('','') ;
           
            ADOConnection.GetTableNames(FLtablename.Items,false);
            ADOConnection.GetFieldNames(FLtablename.Items.Strings[0],ListFIELDSNAME.Items ) ;

Answer 6

可以。procedure TF_1.Button1Click(Sender: TObject);
begin
        ComboBox1.Clear ;
        ADOConnection1.GetTableNames( ComboBox1.Items )
end;procedure TF_1.ComboBox1Change(Sender: TObject);
begin
        ListBox1.Clear ;
        ADOConnection1.GetFieldNames( ComboBox1.Text , ListBox1.Items ) ;
        
end;end.这不仅捕获表名还有字从字段名