如何整理数据库结构文档？（求教！！！！）

liweipop

我在整理我自己的Access2000的数据库结构，有没有一个系统表记录了相关的表名、列名、列类型、长度等基本信息。

大熊

没有

Roadbeg

你可以通过 表集合 来得到这些信息.

李寻欢

用Adox，查一下Adox的帮助

这是帮助中的一个例子：

Sub CloseConnection()

    Dim cnn As New Connection
    Dim cat As New Catalog
    Dim tbl As Table

    cnn.Open "rovider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source= c:\Program Files\Microsoft Office\" & _
        "Office\Samples\Northwind.mdb;"
    Set cat.ActiveConnection = cnn
    Set tbl = cat.Tables(0)
    Debug.Print tbl.Type    ' Cache tbl.Type info
    cnn.Close
    Debug.Print tbl.Type    ' tbl is orphaned
    ' Previous line will succeed if this was cached
    Debug.Print tbl.Columns(0).DefinedSize
    ' Previous line will fail if this info has not been cached

End Sub