i-AUD Server Script 를 호출합니다.
Syntax
public ServerScriptHelper GetServerScript( )
Parameters
없음
Return Value
Type: ServerScriptHelper
Example
'=================================================
' i-AUD Server Script 호출 예제
' i-AUD Designer 에서 Server Script 작성 후 해당 Script 를 호출 할수 있습니다.
'=================================================
Sub GetServerScript()
Dim mxmodule As Object
Dim svc As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
'Server Script 호출 준비
Set svc = mxmodule.xapi.GetServerScript()
'parameter 추가
svc.AddParam "VS_NAME", Range("VS_NAME").Value
'i-AUD 보고서 code, ServerScript Code
svc.Execute "REP379AD55AC6E447CFA3AB9577E043CC4D", "@SVC"
End Sub