Example

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

Dim SessObj as Object
Dim autECLConnList as Object
 
Set autECLConnList = CreateObject("PCOMM.autECLConnList")
Set SessObj = CreateObject("PCOMM.autECLSession")
 
' Initialize the session
autECLConnList.Refresh
SessObj.SetConnectionByHandle(autECLConnList(1).Handle)
 
SessObj.StartCommunication()