示例

以下示例展示了如何将 ZIEWin 仿真器会话连接到主机。

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()