Example

The following example shows how to connect a ZIEWin emulator session to the host.

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