如何读出任意Access数据库的表名和字段名？

Question

如果使用ADO变成.
可以使用CONNECTION对象的OPENSHECMN(名字记不清)方法.
然后遍历结果集,就可以了获得数据库李的任意表明了字段名更简单,你的RECORDER对象的FIELD对象的NAME属性就可以了

Answer 1

获得表明是麻烦些，用DAO的话实施以下代码。至于字段名很简单，就不说了
For i = 0 To ws.Database.TableDefs.Count - 1
                If Data1.Database.TableDefs(i).Attributes = 0 Then
                    List1.AddItem ws.Database.TableDefs(i).Name
                End If
            Next

Answer 2

可以用adox,比较简单就不多说了。