db.Errors.Clear
db.BeginTrans ' 트랜잭션 시작
db.Execute (SQL) ' Execute
if db.Errors.Count > 0 then
db.RollbackTrans ' 에러가 발생한다면 트랜잭션 롤백시킨다.
Set err = Server.CreateObject("AdoDB.Error")
for Each err in db.Errors
Msg (err.Description) ' 에러문 출력
next
err.Close() : Set err=Nothing
else
db.CommitTrans ' 에러없이 진행한다면 트랜잭션 Commit 시킨다.
end if
db.BeginTrans ' 트랜잭션 시작
db.Execute (SQL) ' Execute
if db.Errors.Count > 0 then
db.RollbackTrans ' 에러가 발생한다면 트랜잭션 롤백시킨다.
Set err = Server.CreateObject("AdoDB.Error")
for Each err in db.Errors
Msg (err.Description) ' 에러문 출력
next
err.Close() : Set err=Nothing
else
db.CommitTrans ' 에러없이 진행한다면 트랜잭션 Commit 시킨다.
end if
'asp' 카테고리의 다른 글
| 1차 DB 서버 문제 발생시 2차 서버로 우회 하여 연결하기 (0) | 2010.09.28 |
|---|---|
| ASP에서 오라클 DB를 이용하는 방법 (0) | 2010.09.28 |
| 프로퍼티 & 메소드 (0) | 2010.09.28 |
| DextUpLoad 를 이용한 WaterMark와 Thumbnail (0) | 2010.09.28 |
| Form 변수 일괄처리 하기 (0) | 2010.09.28 |