可以用事务处理的方法~~
on error goto Errdo:Conn.BeginTrans   开始事务
    conn.Execute ssql
Conn.CommitTrans  提交事务Errdo:
    Conn.RollbackTrans 出错事务回滚

解决方案 »

  1.   

    直接做不行吗?不过要定全局变量!FORM_Load()时连接!然后打开,接着......(你想怎样做怎样)
      

  2.   

    这么简单,dim db as database
             dim rs() as recordset
            set db=opendatabase()
           set rs(I)=db.openrecordset()
          对rs()操作吗!
      

  3.   

    sub click()
    对第一表操作,SQL语句之类对第二个表操作,。。end sub大体上就这样了,至于异常之类照上面来吧,几位大哥都给了方法了