Connecting Tech Pros Worldwide Forums | Help | Site Map

Access VBA and Quick3270 mainframe emulator

Newbie
 
Join Date: Jul 2008
Posts: 11
#1: 4 Weeks Ago
I'm not sure if this is the right area to post this one. I have a few Access programs that contain VBA code that currently have a reference to Attachmate Extra Basic to allow some automation between the Access program and our mainframe.

The company I work for has now decided that Attachmate is too expensive and have decided to convert to Quick3270 and I have absolutley no say in what they do. I am hopeing someone out there can give me a push in the right direction to get things to work the same.

I can create the reference and create the objects but for some reason I cant get it to actually do anything to the session once it is open. Following is something very simple that should just type some text on the screen however I get nothing, not even an error.

Expand|Select|Wrap|Line Numbers
  1. ' send something to the screen
  2. Set objQuick3270 = CreateObject("Quick3270.Application")
  3. Set objSession = objQuick3270.ActiveSession
  4. Set objScreen = objSession.Screen
  5.  
  6. With objScreen
  7.  .PutString ("HELLO")
  8. End With  
Thank-you.

Moderator
 
Join Date: Feb 2008
Location: Beauly, near Inverness, Scotland
Posts: 1,576
#2: 4 Weeks Ago

re: Access VBA and Quick3270 mainframe emulator


Hi. This is more of a Quick3270 question than a VBA one really, and I for one am not familiar at all with the emulator concerned. As far as it goes, I can see no fault in the way you are setting the VBA objects in your listing, but without knowing the Quick3270 object model I have no idea whether or not this is truly OK.

Questions:
Can you confirm that the emulator window appears on your screen after you create the object reference? Is it visible by default, or do you have to set it visible explicitly? Has the emulator been configured for you to access your mainframe? If not, would you expect to see characters echoed to the emulator screen if it is not connected - do you need to send some kind of control or escape sequence which sets the emulator off-line before you would see such characters?

-Stewart
NeoPa's Avatar
Administrator
 
Join Date: Oct 2006
Location: London - UK
Posts: 15,730
#3: 4 Weeks Ago

re: Access VBA and Quick3270 mainframe emulator


I doubt there'll be too many here with such specific experience I'm afraid. In such situations I generally recommend that you contact the providers of the system for help. Sometimes they have their own forums, otherwise see what technical support they offer.
ADezii's Avatar
Expert
 
Join Date: Apr 2006
Location: Philadelphia
Posts: 5,218
#4: 4 Weeks Ago

re: Access VBA and Quick3270 mainframe emulator


Quote:

Originally Posted by SonOf27 View Post

I'm not sure if this is the right area to post this one. I have a few Access programs that contain VBA code that currently have a reference to Attachmate Extra Basic to allow some automation between the Access program and our mainframe.

The company I work for has now decided that Attachmate is too expensive and have decided to convert to Quick3270 and I have absolutley no say in what they do. I am hopeing someone out there can give me a push in the right direction to get things to work the same.

I can create the reference and create the objects but for some reason I cant get it to actually do anything to the session once it is open. Following is something very simple that should just type some text on the screen however I get nothing, not even an error.

Expand|Select|Wrap|Line Numbers
  1. ' send something to the screen
  2. Set objQuick3270 = CreateObject("Quick3270.Application")
  3. Set objSession = objQuick3270.ActiveSession
  4. Set objScreen = objSession.Screen
  5.  
  6. With objScreen
  7.  .PutString ("HELLO")
  8. End With  
Thank-you.

Won't the Object Browser expose the Properties, Methods, and Events of the Quick3270 Type Library, and also provide assistance as far as their usage goes?
Newbie
 
Join Date: Jul 2008
Posts: 11
#5: 4 Weeks Ago

re: Access VBA and Quick3270 mainframe emulator


Thanks for responding guys.

Stewart, I have tried with the Quick3270 window already open and also explicitly set it to visible. When I set it to visible it continues to open new windows every time the program runs. Yes the emulator has been configured and I can log in and use it manually with no apparent problems. I need it to be online and logged in so I can key directly into CICS screen locations.

NeoPa, I would agree and have sent a similar question to them as well and am waiting for a responce.

ADezzi. Yes the Object Browser exposes the properties, methods and events. My VBA pannel even autocompletes the code as I type however it still does not do what I'm expecting it to do.

Thanks for your time guys, I will keep at it and hopefully find a solution
Reply