前面加上这句话
conn.execute("set xact_abort on")

解决方案 »

  1.   

    warnning "发生未知错误,提交没有成功!"
    后面应该加一句退出吧
      

  2.   

    加入错误处理看看。
    conn.beginTrans
        On Error GoTo rob      '有错则回滚事务
    for each key in request.form("section")
    conn.execute("insert into vdo_book (courseId,[section],userId) values("&request.form("courseId")&","&key&","&session("Id")&")")
    conn.execute("update user_workers set balance=balance-"&sectionNumber("price")&" where id="&session("Id"))
    next
    if conn.errors.count>0 then
    conn.rollBackTrans
    warnning "发生未知错误,提交没有成功!"
    end if
    set userInfo=conn.execute("select balance from user_workers where id="&session("Id"))
    if userInfo("balance")<0 then
    conn.rollBackTrans
    warnning "对不起,您的余额不足,不能支付!"
    else
    conn.commitTrans
    end if
    exit subrob:
        DBconn.RollbackTrans
        MsgBox "输入信息有错"
      

  3.   

    写错了,dbconn.rollbacktrans应改为conn.rollbacktrans