002. xfnTransExecArr
xfnTransExecArr 함수
트랜잭션이 필요한 여러 SQL문 실행하는 함수입니다.
여러 SQL문은 String 배열의 형태로 저장되어야 합니다.
처음 SQL문이 실행될 때 트랜잭션이 시작되며, 마지막 SQL문이 끝난 후 트랜잭션을 마칩니다.
구문
xfnTransExecArr(strSQLs() As String, Optional conn As ADODB.Connection) As Boolean
반환값
성공 : True
오류 : False
참고
유사한 함수
xfnTransExecVar(ByVal strSQL As String, Optional conn As ADODB.Connection) As Boolean
트랜잭션이 필요한 단일 SQL문을 실행하는 함수입니다.
xfnTransExecColl(objCollections As xProperties, Optional conn As ADODB.Connection) As Boolean
트랜잭션이 필요한 여러 SQL문을 실행하는 함수입니다.
파라미터로 xProperties타입을 사용합니다.
예제
코드
'Connection 객체를 파라미터로 사용하지 않고 함수 사용.
Dim strSQL As String
Dim strSQLs() As String
Dim conn As ADODB.Connection
strSQL = "SELECT * FROM xtCodes"
strSQLs(0) = strSQL
strSQL = "SELECT * FROM tWorkParticulars"
strSQLs(1) = strSQL
If Not xfnTransExecArr(strSQLs) Then
xsbErrMsg "데이터 처리에 실패했습니다."
End If
'Connection 객체를 파라미터로 사용
Dim strSQL As String
Dim strSQLs() As String
Dim conn As ADODB.Connection
Set conn = CurrentProject.Connection
strSQL = "SELECT * FROM xtCodes"
strSQLs(0) = strSQL
strSQL = "SELECT * FROM tWorkParticulars"
strSQLs(1) = strSQL
If Not xfnTransExecArr(strSQLs,conn) Then
xsbErrMsg "데이터 처리에 실패했습니다."
End If
구성요소
strSQLs()
conn
설 명
SQL들이 포함되어 있는 배열입니다.
Connection 객체입니다.