前段时间,因为一直专注Excel的数组和字典,很享受着那种极速的数据处理速度。好久没有使用Access,在使用ADODB链接数据库时,出现三次低级错误:
1,因为新安装的Access,没有在“引用“中勾选下图两个库,导致ADODB不被识别(通常这五个字母自动转大写,就可以用ADODB了)
2,在申明变量的时候,因为没有使用:
Dim rs as ADODB.recordset
(错误的写法:dim rs as recordset)
导致错误:方法和数据成员未找到
3,在使用常用下文语句,独个读取Field字段的名字时,又提示数据类型不匹配:
For each iField in rs.fields
原因:还是需要在Dim的时候使用:
Dim mfield As ADODB.Field
最后,简单回忆一下ADODB的用法,因为field->Fileds->Recordset->Database
Reorderset规定程序每次只能存取一条记录数据,此条记录数据称为“当前数据记录”
所以当我们需要读取整个数据表的数据时,通常需要使用双层循环:
Do Until rs.EOF
mstr = ""
For Each iField In rs.Fields
mstr = mstr & iField & ";"
Next
Debug.Print mstr
rs.MoveNext
Loop