How to extract the session name?

All:

 

I’m going to ask an easy one (hopefully). ; I for the life of me can’t figure out how to extract the session name (or profile name) from within H’Bird basic.  I know IR17;ll can eventually figure it out, but I’ve been at this for three days and I need to get past this.

 

What I’m looking to do is determine if a session is already running, and if it isn’t, start it.  I can come up with the ShortName, UniqueSessionID, etc – but not the actual name of the session.  I want to use it in something like this (taken as an example from the HostExplorer programming guide):

 

Sub Main

          Dim HE as Object

          Dim Host as Object

          Set HE = CreateObject( “HostExplorer”)

 

          Set Host = Nothing        ;  ‘Prepares ̵6;Next̵7; method to get the first host

 

          For I = 1 to HE.Hosts.Count

           ;        Set Host = HE.Hosts.Next(Host)

           ;        MsgBox 220;The current short name is: “ + Host.ShortName

          Next I

 

End Sub

 

 

If I don’t find the session name in this loop, I can open it.  There also may be a better way of doing this, and if so I would appreciate any direction offered.

 

I know I can assign a SessionShortName in the profile, but I’d rather not do that because I don’t want to have to supply the .HEP file to folks using the script.

 

Thanks in advance!

 

-jrt