小生遇到一个问题,我用的adobc控件连接的数据库
然后用datagrid绑定的adobc
我想在其中加一条记录,请问怎么实现?
(不是用rs.open "select...",conn_1....这种方法,需要用adobc的recordset增加,而且是用代码,不是和txtbox绑定)
请问可不可以实现?请把具体代码写出。

解决方案 »

  1.   

    可以的Adodc1.Recordset.AddNew
    Adodc1.Recordset.Fields("xxx") = "asdfsd"保存到数据库
    Adodc1.Recordset.Update
      

  2.   

    不清楚你的问题,是想在datagrid里面直接添加吧?用动态方式打开,添加后更新一下不行吗?
      

  3.   

    我是新见一个textbox,动态方式怎么打开啊?
    lihonggen0用adodc1.recordset!XXX为什么不行啊?
      

  4.   

    adodc1.recordset![XXX] = adodc1.recordset.fields("XXX")
      

  5.   

    Adodc1.Recordset.AddNew
    Adodc1.Recordset.Fields("xxx") = "asdfsd"
    Adodc1.Recordset.Update
      

  6.   

    如果text和adodc绑定了
    Adodc1.Recordset.AddNew
    Adodc1.Recordset.Update
      

  7.   

    如果你不绑定的话你可以用一下这个啊
    Dim Conn as New ADODB.Connection
    Dim strcon as string
    strcon="Provider=SQLOLEDB;Data Source=yourservername;Initial Catalog=DatabaseName;User Id=sa;Password="
    Conn.Open strcondim strSQL as string
    strSQL="INSERT INTO table1 VALUES('"+ text1.text + "','" text2.text+..........+"')"
    Conn.Errors.Clear
    Conn.BeginTrans
    Conn.Execute strSQL
    IF Conn.Errors.Count=0 Then
       Conn.CommitTrans
    Else
       Conn.RollbackTrans
       MsgBox Conn.Errors(0).Descrble (????) '这个地方忘了
    Endif