| |
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 액세스 버전(95,97,2000,2002): 2000
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP): 2000
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
ADP 파일을 생성하여 폼 명령버튼에 다음과 같이 코딩을 하였습니다.
If MsgBox("현재 등록내용을 확정하여 보내시겠습니까? (이후 수정 불가)", vbYesNo + vbQuestion, "등록내용확정송부") = vbYes Then
DoCmd.RunSQL ("INSERT INTO dbo.Result_All (Jumpo, Year, Quarter, Code_T, Code_M, Jumsu, UserID, Center, Opinion) SELECT Jumpo, Year, Quarter, Code_T, Code_M, Jumsu, UserID, Center, Opinion FROM dbo.Result where UserID = '" & myId & "'")
DoCmd.RunSQL ("Delete FROM dbo.Result where UserID = '" & myId & "'")
Else
Cancel = True
End If
간단히 말씀드리면
첫번째 SQL 문장에서는 Insert 처리를 하고
두번째 SQL 문장에서는 위 Insert 한 부분을 Delete 하는데
첫번째 문장에 에라가 있을 경우에도 메세지 출력후
두번째 문장을 그대로 처리합니다.
SQL Server에서의 Begin Tran ~~~~~ Commit 문 처럼
이 두 SQL 문을 트랜젝션 처리할 수 있는 방법이
VBA 코딩에서 있는지 궁금합니다.
즉 첫번째 문장과 두번째 문장중 어느 한 문장에도 에라가
있으면 모든 SQL 문이 실행되면 안됩니다.
고수님의 고견 부탁드립니다.
PS : Crocii 님 여러 도움에 참으로 감사드립니다. 간단한 인적사항이나
알고 싶군요!
|
|
액세스에 대한 질문과
답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
