[본문스크랩] ASP DB 트랜젝션 처리

DB.Errors.clear

DB.BeginTrans '트랜잭션 시작

DB.Execute (SQL) 'Execute

 

if DB.Errors.count>0 Then

   DB.RollbackTrans '에러가 발생한다면 트랜잭션 롤백시킨다.

   Set objError = Server.CreateObject("ADODB.Error")

   for each objError in DB.Errors

        Msg (objerror.Description)  '에러문 출력

   Next

   objError.close

   Set objError=Nothing

Else

   DB.CommitTrans '에러없이 진행한다면 트랜잭션 Commit 시킨다.

End if