例

なし

Dim OIAObj as Object
Dim autECLConnList as Object
 
Set autECLConnList = CreateObject("ZIEWin.autECLConnList")
Set OIAObj = CreateObject("ZIEWin.autECLOIA")
 
' Initialize the session
autECLConnList.Refresh
OIAObj.SetConnectionByHandle(autECLConnList(1).Handle)
 
OIAObj.StartCommunication()