最后20分给你！经常出现7004-行集合不能作为标签

Question

recoguashi.Open "bguashi", mconn, adOpenKeyset, adLockOptimistic, adCmdTable

Answer 1

'试试这个
Dim mconn As New ADODB.Connection
mconn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\..\xxx.mdb;Persist Security Info=False"
Dim recoguashi As New ADODB.Recordset
'========
Set recoguashi.ActiveConnection = mconn
recoguashi.Properties.Item("IRowsetIdentity").Value = True
'=========
recoguashi.Open "bguashi", , adOpenKeyset, adLockOptimistic', adCmdText
Set dgguashi.DataSource = recoguashi '/*运行到该语句出现上面错误*/