Prev: Debug error in VB2005 Express Edition
Next: color conversion
From: mot98 on 22 Sep 2006 11:09
Hi All,

I have a VB application that connects to the IBM I-Series client and
sends some keystrokes.

I am connecting using PCOMM with the following code:

Dim autECLSession As AutConnList
Dim autECLPS As AutPS
varSerial = frmMain.txtSerial1
Set autECLConnList = CreateObject("pcomm.autECLConnlist")
Set autECLPS = CreateObject("pcomm.autECLPS")

autECLConnList.Refresh

'Connecting to Session A


autECLPS.SetConnectionByName ("A")

autECLPS.SendKeys "[FLDEXT]"
autECLPS.SendKeys "1" & "[ENTER]"
autECLPS.SendKeys "1" & "[ENTER]"
autECLPS.SendKeys "STK" & "[ENTER]"
autECLPS.SendKeys varSerial & "[ENTER]"


This works fine....however, I need to put some error checking in place
to ensure that the Emulator window is not in an error state, and is
ready to accept data.

Is there a way to check to see if there is an error on the screen??

Thanks for any idea's.

Mike

 | 
Pages: 1
Prev: Debug error in VB2005 Express Edition
Next: color conversion