在向datagrid输入的时候,
允许更新的属性为true能不能 先不绑定数据控件,在全部输入完成以后,再绑定,将数据保存到数据库,
请问如何实现。如何写代码?

解决方案 »

  1.   

    set DATAGRID.DATASOURCE=RECORDSET
      

  2.   

    不用绑定。你首先要在VB菜单中:
    “工程”-->“引用”-->“Microsoft AxtiveX Data Objects 2.X Library”
    注:2.X为版本号,如果你机子上有高版本的就用高版本的,如:2.5或2.6的Private Sub ComOK_Click()
       Dim SQLstr As String,cnstr AS String
      Dim cn AS New ADODB.Connection'连接对象
       Dim rs As New ADODB.Recordset'记录集对象
       cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;" _
                       & "Data Source=" & App.Path & "\data\XXX.mdb;" _
                       & "Persist Security Info=False" '连接字符串
       cn.open cnstr' 打开数据库连接
       rs.CursorLocation =adUseClient
       sqlstr="slect * from XXX表"
       rs.open sqlstr,cn,3,3'执行SQL语句,并返回记录
       set datagrid1.datasource=rs'将结果显示到datagrid控件中
       datagrid1.refresh
       rs.close'关闭记录集对象
       set rs=nothing
    End Sub
    本示例是将数据库中的一张表的记录显示在datagrid的控件中。如果你要将输入的数据写到数据库中你自己再写一个更新数据库的函数或过程。