Click here to Skip to main content
15,918,243 members
Please Sign up or sign in to vote.
1.00/5 (2 votes)
See more:
Hi All,
i am new in Vba programing,when i am using macros with Attachmate Extra 9.0,it's worked fine partially after it will get an error on a particular line as given below, can anyone Please find the solution so that it can works fine.


Do While Scr1.GetString(k,2,2)<> "=="

Scr1.PutString "V",k,2 /Run TimeERROR/
k = k+1
Loop
Scr1.SendKeys("<enter>")
Call Waiter
If Scr1.GetString(7,22,13) ="Data is being" Then
Call Waiter
Scr1.SendKeys ("<enter>")
Call Waiter
End If

Thanks in Advance
Posted
Updated 14-Jul-15 2:25am
v4

1 solution

I don't know Attachmate at all, but from what I can gather after Googling for "Attachmate 2147417851", your session is not in a valid state when you try to push the string. The session may be waiting for some processing to finish before being able to accept input?
 
Share this answer
 
Comments
Member 11721449 15-Jul-15 1:31am    
Hi Dave Kreskowiak,Thanks for quick response me , as i am new in vba programing i dont know about how fix that issues , can you please send me the exact details or step ,how to fix the issues so that it can work fine
In Xp O/S it will working fine with Extra 6 attachmate(it's a tool to connect with mainframe),please help me to resolve the above issues as soon as posible
Dave Kreskowiak 15-Jul-15 20:00pm    
No, I can't. You're issue has nothing to do with VBA. It has everything to do with your logic and how your code is interacting with the session in progress. I have no idea what your session is doing at the time the error is thrown. I don't have Attachmate to test with, nor a mainframe to test with either.

I did give you a possible hint to look at. I have no idea if this is the case, how you're going to test for it, or even what you can do to fix it.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900