'不打开不会知道的。
'可以打开数据库,然后——
Dim c As ADODB.Connection
Dim a As ADODB.Recordset
Dim b As ADODB.Field
'打开表
For Each b in a
Debug.Print b.Name
Next
'可以打开数据库,然后——
Dim c As ADODB.Connection
Dim a As ADODB.Recordset
Dim b As ADODB.Field
'打开表
For Each b in a
Debug.Print b.Name
Next
用ADODB.Recordset.Fields.Count
就可以啊,我试过了。
to xzsmartboy(小杰) 当然可以.
谢谢两位!
E-mail : [email protected]