有关于ado数据库编程

Question

分两步走：
一、给数据库增加一条记录；
二、刷新datagrid的数据源。

Answer 1

recordsetName.addnew
recordsetName.fields("第一个字段").value = aa
.
.
.
recordsetName.update
datagrid.refresh

Answer 2

AdodcForAttendanceCheck As ADODB.Recordset
AdodcForAttendanceCheck.AddNew
Set DataGridForAttendanceCheck.DataSource = AdodcForAttendanceCheck
输完数据后再
AdodcForAttendanceCheck.update

Answer 3

Private Sub btn_insert_Click()

 With Dg_sub
     .AllowAddNew = True
     .AllowUpdate = True
     If .ApproxCount >= 1 Then
        .Row = Dg_sub.ApproxCount
        .col = 0
     End If
     Call set_btn
  End With

end sub

Answer 4

Private Sub btn_edit_Click()

  Dg_sub.AllowUpdate = True
  Call set_btn

End Sub

Answer 5

Private Sub btn_save_Click()
   
 On Error GoTo errhandle
    .AllowAddNew = False
    .AllowUpdate = False
    rst.UpdateBatch
    Call set_dg
  
End Function

Answer 6

data1.recordset.addnew
我写的时候是用
adodc1.recordset.addnew
如果不行就试试这段代码
WITH bd
       .allowaddnew=true
       .allowupdata=true
end with
adodc1.recordset.addnew

Answer 7

recordsetName.addnew
recordsetName.fields("第一个字段").value = trim(edit1.text)
.
其它相应的字段
.
recordsetName.update
datagrid.refresh