vba ado transation

vba关于事务的问题
想要做简单的数据插入的操作
把excel中的数据登陆到db中
知道下面2种更新数据的方法
方法1：
on error goto ErrHandle
     conn.begintrans    '开始事务
     conn.execute "insert into ..."
     conn.execute "update ..."
     conn.execute "delete from ..."
     conn.committrans    '提交事务
     msgbox "操作成功！",vboklnly,"提示"
     exit sub
'错误处理
ErrHandle:
     conn.rollbacktrans    '出错，回滚事务
      msgbox "操作失败，错误原因为：" & Err.Description, vbExclamation, "提示"
     exit sub
方法2：
定义dataset
dataset.update