如何利用ADODB对象获取数据库内的表格总数???

Question

如何利用ADODB对象(比如connection连接对象)获取数据库内的表格总数???

Answer 1

留个邮箱，我发个ADO开发资料给你

Answer 2

    Dim con As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; " _
        & "Data Source=" & App.Path & "\test.mdb;" _
        & "Persist Security Info=False;"
    con.Open
    Set rs = con.OpenSchema(adSchemaTables)
    While Not rs.EOF
        If UCase(rs!table_type) = "TABLE" Then
            Debug.Print rs!TABLE_NAME
        End If
        rs.MoveNext
    Wend

Answer 3

在ORACLE直接查询一个系统表就能找到