请问高手：用adodc控件和datagrid控件如何实现数据库操作？

Question

没有必要用addnew,我是直接这样做的
  Adodc1.Recordset.Fields("ss") = Trim(Txtbxylxg.Text)
  Adodc1.Recordset.Fields("d") = Trim(Txtrgzxg.Text)
  Adodc1.Recordset.Fields("sd") = Trim(Txtgwqsxg.Text)
  Adodc1.Recordset.Update
  Adodc1.Refresh
set datagrid1.datasource=adodc1

Answer 1

楼上的，可以提供个ADO的操作实例吗？谢了！

Answer 2

其实也没有什么难的，你只要提前将adodc与数据库连接上但不与datagrid连接就可以了，等到用上的时候再设adodc1.recordsource=""或者如上直接添加数据，重要的是要加上adodc1.refresh及最后现将datagrid与adodc相连接就可以了！

Answer 3

已经可以添加数据，但还是希望有个实例参考，不知楼上的可否知道哪有ado操作的实例？

Answer 4

msdn里面应该有。我做程序时一般都是自己试的。

Answer 5

其实最简单的办法就是把datagrid的AllowAddNew属性设为true就可以直接在datagrid上面增加记录了.把AllowUpdate属性设为true,就可以实现在datagrid上更新字段了.

Answer 6

如过你要用这种方法,在原来的代码前加入这条语句:
Adodc1.Recordset.AddNew

Answer 7

代码如下：Private Sub Cmdadd_Click()
  Adodc1.Recordset.AddNew
  Adodc1.Recordset.Fields("flnum") = Trim(Textflnum.Text)
  Adodc1.Recordset.Fields("flname") = Trim(Textflname.Text)
  Adodc1.Recordset.Fields("flxm") = Trim(Textflxm.Text)
  Adodc1.Recordset.Update
  
Set DataGrid1.DataSource = Adodc1
Textflnum.Text = "": Textflname.Text = "": Textflxm.Text = ""End Sub

Answer 8

在Adodc1.Recordset.Update之前要先为每个字段赋值  
  Adodc1.Recordset.AddNew
  Adodc1.Recordset.Fields("ss") = Trim(Txtbxylxg.Text)
  Adodc1.Recordset.Fields("d") = Trim(Txtrgzxg.Text)
  Adodc1.Recordset.Fields("sd") = Trim(Txtgwqsxg.Text)
  Adodc1.Recordset.Update
  Adodc1.Refresh
  set datagrid1.datasource=adodc1

Answer 9

看来你没有加上adodc1.refresh.是不是呀？