Hello,
First off, I'm so glad that I've found this community. I am hoping that someone can give me a hand doing identifying existing reflection sessions.
I'm able to open a new instance of reflections and then automate that using this code.
Code:
Public Sub SeperateAOM()
Dim Ref As Reflection.Session
Dim refAom As Reflection.Session
Dim refBBP As Reflection.Session
Dim ReflectionReGIS As Object
Set ReflectionReGIS = GetObject("RIBM")
'Declare the Reflection Object
Dim Ribm As Reflection.Session
'Create a new instance of Reflection for IBM
Set Ribm = CreateObject("ReflectionIBM.Session")
Ribm.OpenSettings rcSettings, "Session.rsf"
'Make Reflection visible
Ribm.Visible = True
'Use the Caption property to change the Reflection window title
Ribm.Caption = "Remote Terminal"
Ribm.TransmitANSI ("Works")
Ribm.RunExternalMacro "Sessions.rsf", "TimeLoopWait", ""
End Sub
But what I'm trying to do is loop through all open versions of reflections, and then enter some information in each one.
I've seen some solutions using the attachmates EXTRA! program, but I can't get any of those to work with the tools in the reflections reference library.
I would really appreciate any kind of tips or tricks, I've been working in reflections for a few months now and while its very similar to other mainframe emulators I've worked on, it does have its own... attitude in some ways.