Number of data streams received since the connection is made to the
host.
Screen.ScreenID
Dim AllSessions
As OhioSessions Set AllSessions = New OhioSessions Set MySession = AllSessions.AddSession("C:\test.zcc", 1) MySession.Connect Set MyScreen = MySession.Screen MsgBox "Number of data streams received: " & MyScreen.ScreenID AllSessions.CloseSession MySession.SessionName |
IOhioSessions AllSessions; if ( AllSessions.CreateDispatch(CLSID_OhioSessions)
) try IOhioSession MySession; MySession = AllSessions.AddSession(
"C:\\test.zcc", 1 ); ::Sleep(500); } } ex->ReportError(); } } |
try { PASSHIOLib.OhioSessions AllSessions; PASSHIOLib.OhioSession MySession; PASSHIOLib.IOhioScreen MyScreen; AllSessions = new PASSHIOLib.OhioSessionsClass (); MySession = AllSessions.AddSession( "C:\\test.zcc", 1 ); MySession.Connect(); while ( 0 == MySession.isConnected () ) { System.Threading.Thread.Sleep(500); } MyScreen = MySession.Screen; MessageBox.Show ("Number of data streams received: " + MyScreen.ScreenID"); Marshal.ReleaseComObject(MyScreen); AllSessions.CloseSession( MySession.SessionName); Marshal.ReleaseComObject(MySession); } catch (Exception ex) { MessageBox.Show ("Exception: " + ex); } |