记录集问题

Question

显示
错误:3251
当前记录集不支持更新,
什么意思啊 ?
我数据库不是只读的,这个怎么解决啊?
Option Explicit
Private add As ADODB.Recordset
Private Sub Command1_Click()
Set add = g_DBCon.Execute("select * from goods")
If txtid.Text = "" Or txtname.Text = "" Or txtsort.Text = "" Or txtcode.Text = "" Or txtnum.Text = "" Then
    MsgBox "请输入完整信息...", vbInformation + vbOKOnly, "错误"
Else
    add.AddNew
    add.Fields("number").Value = txtnum.Text
    add.Update
    DataGrid1.Refresh
End If
End Sub

Answer 1

set add=new adodb.recordset
Set add = g_DBCon.Execute("select * from goods")
另外需要游标类型为1，3或其他