페이지 이력

...

코드 블럭

language	vb
title	Example
linenumbers	true

Sub ExcuteDML()
    
    Set mxmodule = Application.COMAddIns.Item("iMATRIX6iMATRIX.ExcelModule").Object
	mxmodule.xapi.ExecuteDML "mtxrpty", "insert into mtx_ftp values('1112','user',100, 'pw','path','attr1')"
 
    If mxmodule.xapi.LastErrorCode <> 0 Then
    	MsgBox "쿼리 실행 오류 " & mxmodule.xapi.LastErrorMessage
    End If
End Sub

ProdedureProcedure에서 Insert, Update, Delete 처리를 위한 VBA 코드

코드 블럭

language	vb
title	Example
linenumbers	true

Sub ExcuteDML()
    
    Set mxmodule = Application.COMAddIns.Item("iMATRIX6iMATRIX.ExcelModule").Object

	sql = "exec pro_test1 ?, 'AAAA' "   'return 받을 Parameter로 첫번째 값을 할당한다.
    mxmodule.xapi.SID = "#021"
	mxmodule.xapi.ExecuteDML "mtxrpty", sql

 
    If mxmodule.xapi.LastErrorCode <> 0 Then
    	MsgBox "쿼리 실행 오류 " & mxmodule.xapi.LastErrorMessage
    End If
End Sub

...

공간 바로가기

페이지 트리

버전 비교

이전 버전 2

새 버전 현재

키