大侠请留步~~~~~~~~~关于ACCSEE表字段类型

Question

怎样提取ACCSEE数据库表中的字段名、类型、长度等

Answer 1

Private Sub Command14_Click()
Dim i As Long, ii As Long
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
db.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & "data source=" & App.Path & "\dev.mdb"
db.Open
rs.Open "select * from traplog", db
ii = rs.Fields.Count
For i = 0 To ii - 1
    Debug.Print rs.Fields(i).Name '字段名
    Debug.Print rs.Fields(i).Type '类型
    Debug.Print rs.Fields(i).ActualSize '长度
Next i
End Sub

Answer 2

rs.Fields(i).DefinedSize就是你设定的最大长度.那个202就是文本类型

Answer 3

还有一个问题ACCSEE有没有象SQL那样的系统表，直接可以通过系统表读出这些东西，还有表名