例

以下の例は、ZIEWin エミュレーター・セッションをホストへ接続する方法を示しています。

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