Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Disconnect A Session 2

Status
Not open for further replies.

SkipVought

Programmer
Dec 4, 2001
47,492
US
Hi Gang!

I am running VBA in Excel, an unattended process, where I create an Extra System object, a session, a screen, log in to an IMS session on the mainframe, do stuff, then...

here's where I am experiencing my "opportunity."

When I
Code:
    oSystem.Quit
I get a 'Yes/No' message box...
Extra!Personal Client
Do you want to disconnect session 'session name'?
How can I dispose of this message via code?


Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
I assume Application.DisplayAlerts = False doesn't work? The help text seems to indicate it's not just for Excel prompts and messages.

I don't have access to the Extra object model. Is there possibly a parameter available on the Quit method to suppress prompts? How about if you did a oSystem.Visible = False before quitting?

Just offering some shots-in-the-dark here since I don't have the product.
 
Dave,

Thanks for the shots.

"How about if you did a oSystem.Visible = False before quitting?" got me to experimenting.

It seems, and I'll have to give it a bit more of a test, that setting the SESSION Visible property to FALSE, prior to Quitting the System, causes the Extra.exe application to quit without intervention!!!

Thank You!

Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 

In my Global Preferences... in Extra on General Tab, there are 2 options:

On close session/application exit (frame)
o Auto-save session setting
o Prompt for session saves

I have first option checked and never have a question about saving the session. You may have second option chosen, just change it to Auto-save and try again.

Have fun.

---- Andy
 
Thanks, Andy!

Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 

WOW! That was it?
I am glad to help you Skip, after you helped me so many times, in VBA usually. :)


Have fun.

---- Andy
 
Andy,

I oft express how Tek-Tips continues to be a learning experience for me. I value your contributions, not only for my sake, but also for the Tek-Tips community.

Tip on!

Skip,

[glasses]Just traded in my old subtlety...
for a NUANCE![tongue]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top