Example
The following example shows how to connect a ZIEWin emulator session to the host.
Dim PSObj as Object
Dim autECLConnList as Object
Set autECLConnList = CreateObject("ZIEWin.autECLConnList")
Set PSObj = CreateObject("ZIEWin.autECLPS")
' Initialize the session
autECLConnList.Refresh
PSObj.SetConnectionByHandle(autECLConnList(1).Handle)
PSObj.StopCommunication()