Question

VB数据库相关，实时错误，求大神救命 对象'refresh'的方法'IADODC'失败.

以下是代码，实在不知道出现什么错误
Private Sub Form_Load()
Dim i As Integer
Set DataGrid1.DataSource = Adodc1

Adodc1.RecordSource = "select * from 库存表"
Adodc1.Refresh
cmbfield.Clear
For i = 0 To Adodc1.Recordset.Fields.Count - 1
cmbfield.AddItem Adodc1.Recordset.Fields(i).Name
Next i
cmbfield.Text = cmbfield.List(0)
End Sub

Adodc1.RecordSource 设置是对的

Adodc1.Refresh 就提示这句错误，为什么啊，仅有的分奉上，在线等了

Answer 1

Adodc1.CommandType = adCmdText

Answer 2

Adodc1连接无数据