'DAO3.6----------'
Set Db = DBEngine.OpenDatabase(CommonDialog1.FileName, False, False, ";pwd=wk123")
Set rs = Db.OpenRecordset(Sql, dbOpenDynaset)
Set Rs = Db.OpenRecordset(Sql, 1)
'DAO3.6----------'用上面的代码打开数据库却不能更新内容,不能执行rs.update为什么??ADODB 的代码如下,也不能通过,不过好象是连接字符串有问题,我不明白。Cmd = "Provider=microsoft.jet.OLEDB.3.51;Password=wk123;" & "Data Source=" & CommonDialog1.FileName
Set cn = New ADODB.Connection
    With cn
        .ConnectionString = Cmd
        .Open ‘   这里就出现错误了,不能执行。
    End With
Set Rs = New ADODB.Recordset
Rs.Open Sql, cn, 1, 3请高手指出错误,使得我能打开数据库并能更新,执行rs.edit ,rs.update

解决方案 »

  1.   

    cmd= "provider=microsoft.jet.oledb.3.51;password=wk123;data source=hpmis;"
      

  2.   

    用 ADO !
        ADO 的功能比 DAO3.6 ,ADODB都强大
      

  3.   

    dim sql as string
    dim cmd as string 
    sql"(你所进行的数据库操作语句)"
    Cmd = "Provider=microsoft.jet.OLEDB.3.51;Password=wk123;" 
    dim con as connection
    set con=new connection
    con.open cmd
    com.isolationlevel=adxactserializable
    con.begintrans
    con.execute sqlcon.committrans或dim sql as string
    dim cmd as string 
    sql"(你所进行的数据库操作语句)"
    Cmd = "Provider=microsoft.jet.OLEDB.3.51;Password=wk123;" 
    dim con as connection
    set con=new connection
    dim rs as dbodb.recordser
    set rs =new adodb.recordset
    rs.coursorlocation=aduserserver
    rs.cursortye=adopendunamic
    rs.locktype=adlockpessimistic(注意在次因不同的数据库操作要求而选项不同)
    rs.open sql,con
    ....建议找个ADO的教材对其进行系统学习放弃DAO吧!
      

  4.   

    dim sql as string
    dim cmd as string 
    sql"(你所进行的数据库操作语句)"
    Cmd = "Provider=microsoft.jet.OLEDB.3.51;Password=wk123;" 
    dim con as connection
    set con=new connection
    con.open cmd
    com.isolationlevel=adxactserializable
    con.begintrans
    con.execute sql
    con.committrans或dim sql as string
    dim cmd as string 
    sql"(你所进行的数据库操作语句)"
    Cmd = "Provider=microsoft.jet.OLEDB.3.51;Password=wk123;" 
    dim con as connection
    set con=new connection
    dim rs as dbodb.recordser
    set rs =new adodb.recordset
    rs.coursorlocation=aduserserver
    rs.cursortye=adopendunamic
    rs.locktype=adlockpessimistic(注意在次因不同的数据库操作要求而选项不同)
    rs.open sql,con
    ....建议找个ADO的教材对其进行系统学习放弃DAO吧!
      

  5.   

    恕我无知:ADO 和ADODB有什么不同吗??
      

  6.   

    ADO有ADODC(控件)和ADODB之分。