페이지 트리

버전 비교

  • 이 줄이 추가되었습니다.
  • 이 줄이 삭제되었습니다.
  • 서식이 변경되었습니다.

...

코드 블럭
languagevb
titleSyntax
public longstring ExecuteEncrypt(string dbmsCode, string sqlText, int maxRecord = 0value)


Parameters

Name동작명비고
dbmsCode
dmsCode ex)mtxrpty
sqlText
SQL문maxRecord최대Record수
value
암호화할 문자열







Return Value

Type:  long

Error 여부 

Exception 발생 -2

성공 0

  string

암호화한 문자열 출력


VBA 코드


코드 블럭
languagevb
titleExample
linenumberstrue
Sub ExecuteTestEncryptTest()
	Dim mxmodule As Object

       
	Set mxmodule = Application.COMAddIns.Item("iMATRIX.ExcelModule.AddinModule").Object
    
	ret        
        'execute (dbmscode, sqltext, [optional] maxrecord)
	= mxmodule.xapi.Execute Encrypt("mtxrptymessage", "select * from mtx_user"
	If mxmodule.xapi.LastErrorCode != 0 Then
		MsgBox "쿼리 실행 오류 " &)
	debug.print ret
     
	ret = mxmodule.xapi.LastErrorMessage
	Else
		Range("a1").CopyFromRecordset mxmodule.xapi.LastRecordset
	End If
	Set rs = Nothing
Decrypt(ret)
	debug.print ret
End Sub