Adodc1添加操作出错

Question

实时错误'91'
对象变量或With块变量未设置Private Sub Command1_Click()Form1.Adodc1.Recordset.AddNew
Form1.Adodc1.Recordset.Fields("CL_ID") = Trim(Text1(0).Text)
Form1.Adodc1.Recordset.Update
Unload MeEnd Sub如何解决？谢谢！

Answer 1

给Adodc1的属性ConnectionString和RecordSource 赋值了吗？

Answer 2

Data1.Recordset.Fields("name") = Trim(Text1.Text)
Data1.Recordset.Fields("pwd") = Trim(Text2.Text)
Data1.Recordset.Update
我这个可以。你可以试试，不知道有帮助没有

Answer 3

  原因:Adodc1.Recordset没有初始化, 初始化方法目前不知道,
     但拖一个DataGrid(不管你用不用它),并将其数据源指定为Adodc1, 问题解决!!!

Answer 4

看看数据库表中字段名是不是"CL_ID"?