今天想用VB写是管理系统..数据库是用ACCESS写的.可是到最后当要保持数据库的完整性的时候却发现做不到,不知道怎么办..请教各位大虾了..

解决方案 »

  1.   

    如果你是用ADO操作数据库,那就启用事务...
      

  2.   

    '用事务处理数据库的例子
    private sub command1_click()
    on error errhandle
        conn.begintrans    '开启事务
         conn.execute "insert into tablename(...) values(...)    '增加记录
         conn.execute "update tablename set ... where ..."       '更新记录
         conn.execute "delete from tablename where ..."          '删除记录
         conn.committrans   '提交事务
         msgbox "操作成功!",vbokonly,"提示"
        exit sub
    errhandle:
        conn.rollbacktrans    '出错,回滚事务
         msgbox "保存失败,错误原因为:" err.description,vbexclamation,"提示"
        exit sub
    end sub