How to connect to quick 3270 secure screen through VBA macro?

5 pts.
Tags:
Excel 2007
microsoft excel functions
Microsoft Excel macros
VBA macro
VBScript
Hi, I use the following code to connect to quick 3270 macro and it also connect to the screen. But when I run the macro for the first time it works, but does not work when I run the same macro for second time. If I restart the mainframe then the macro runs. Below is the code.

Sub getdata() Set objQuick3270 = CreateObject("Quick3270.Application") objQuick3270.Visibility = True Set objSession = objQuick3270.ActiveSession Set objScreen = objSession.Screen HostSettleTime = 3000 ' milliseconds objSession.Server_Name = "Server Name" 'Server that u are using objSession.Model_Name = "IBM-7248-2-A" objSession.Connect 


Please help me in this regard.

Software/Hardware used:
MS Excel 2007

Answer Wiki

Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Discuss This Question:  

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Thanks! We'll email you when relevant content is added and updated.

Following