没有用到Adodc控件与Datagrid绑定,只是在程序中写出代码对Datagrid进行绑定,设置一按钮对datagrid及数据集增加记录,程序代码如下:
Public Sub cmdAdd_Click()
   Me.rsTest.AddNew          'rsTest为数据集
   Me.rsTest.Update          
   Me.DataGrid1.SetFocus  
   Exit Sub
End Sub但是就是不能对后台数据库进行添加,不知道出了什么问题,请各位大侠帮帮手,小生这厢有礼了。万分感谢,万分感谢!!

解决方案 »

  1.   

    好象要分开
    Public Sub cmdAdd_Click()
       Me.rsTest.AddNew          'rsTest为数据集
    End SubPublic Sub cmdUpdate_Click()
       Me.rsTest.Update          
       Me.rsTest.Refresh
       Me.DataGrid1.SetFocus  
    End Sub
      

  2.   

    我的connection是打开的,但是程序要求在一个按钮中实现增加功能怎么办?
      

  3.   

    Public Sub cmdAdd_Click()
       Me.rsTest.AddNew          'rsTest为数据集
    '加入下列代码
       Me.rsTest.Fields(0) = Trim(Text1(0))
        ....
       Me.rsTest.Fields(11) = Trim(Text1(11))   Me.rsTest.Update          
       Me.DataGrid1.SetFocus  
    End Sub