很急！救命！

adodb.addnew
adodo.fields(0)="xx"
adodb.update

解决方案 »

  1.   

    我用的是ado控件
    ado控件没有addnew方法啊。
      

  2.   

    Adodc1.Recordset.AddNew
    Adodc1.Recordset.Fields(0) = "xx"
    Adodc1.Recordset.Update
      

  3.   

    建议少用ADO控件
    因不每一个ADO控件，都须一个独立的Connection
      

  4.   

    你有没有进行打开ADO的工作？
    打开后，请使用
    Adodc1.Recordset.AddNew
    Adodc1.Recordset.Fields(0) = "xx"
    Adodc1.Recordset.Update
    打开的方法：
    dim rst as new adodb.recordset
    指定打开类型，打开方式，锁类型。
    打开后将set adodb1.recordset=rst将RST赋值给ADO.
      

  5.   

    Dim myCon As ADODB.Connection
    Dim myRS As New ADODB.Recordset
    Set myCon = New ADODB.Connection
    myCon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataPath & " ;Persist Security Info=False"
    myCon.Open
    myRS.CursorLocation = adUseClientmyRS.AddNew
    myRS.Fields(0) = "..."
    myRS.Fields(1) = "..."
    .......
    myRS.Update