Can I add this VB script to a VBA script?
 

I have the following VB script that I have recorded from a terminal session
at work. I wish to use this in a VBA script to manipulate the terminal to
action a repeated number of tasks to extract data and store in Excel. The
example below enters a bit of text and then actions the [enter] key.

I know I can use SendKeys and the like but the [enter] key throws up some
problems through SendKeys as the terminals I use don't always recognise the
[enter] passed by SendKeys.

Any suggestions on how I could change the format of the script below to work
within VBA would be much appreciated.

Cheers

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=testVB
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "12345ABCDE"
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "[enter]"
end sub

Can I add this VB script to a VBA script?
 

Checkout:

http://msdn2.microsoft.com/en-us/lib...81(VS.60).aspx

Additinally, once the SendKeys have been issued, include a DoEvents. This
will help to insure that the receiving app will get focus long enough to
accept the keys.
--
Gary''s Student - gsnu200714


"Designated Dave" wrote:

I have the following VB script that I have recorded from a terminal session
at work. I wish to use this in a VBA script to manipulate the terminal to
action a repeated number of tasks to extract data and store in Excel. The
example below enters a bit of text and then actions the [enter] key.

I know I can use SendKeys and the like but the [enter] key throws up some
problems through SendKeys as the terminals I use don't always recognise the
[enter] passed by SendKeys.

Any suggestions on how I could change the format of the script below to work
within VBA would be much appreciated.

Cheers

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=testVB
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "12345ABCDE"
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "[enter]"
end sub

Can I add this VB script to a VBA script?
 

Thanks for pointing me in the right direction.

Appreciate your help.

Cheers

"Gary''s Student" wrote:

Checkout:

http://msdn2.microsoft.com/en-us/lib...81(VS.60).aspx

Additinally, once the SendKeys have been issued, include a DoEvents. This
will help to insure that the receiving app will get focus long enough to
accept the keys.
--
Gary''s Student - gsnu200714


"Designated Dave" wrote:

I have the following VB script that I have recorded from a terminal session
at work. I wish to use this in a VBA script to manipulate the terminal to
action a repeated number of tasks to extract data and store in Excel. The
example below enters a bit of text and then actions the [enter] key.

I know I can use SendKeys and the like but the [enter] key throws up some
problems through SendKeys as the terminals I use don't always recognise the
[enter] passed by SendKeys.

Any suggestions on how I could change the format of the script below to work
within VBA would be much appreciated.

Cheers

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=testVB
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "12345ABCDE"
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "[enter]"
end sub

Can I add this VB script to a VBA script?
 

Any time Dave. If you come across a good site or book that assists with
conversion of VB to VBA, I would be interested.
--
Gary''s Student - gsnu200714


"Designated Dave" wrote:

Thanks for pointing me in the right direction.

Appreciate your help.

Cheers

"Gary''s Student" wrote:

Checkout:

http://msdn2.microsoft.com/en-us/lib...81(VS.60).aspx

Additinally, once the SendKeys have been issued, include a DoEvents. This
will help to insure that the receiving app will get focus long enough to
accept the keys.
--
Gary''s Student - gsnu200714


"Designated Dave" wrote:

I have the following VB script that I have recorded from a terminal session
at work. I wish to use this in a VBA script to manipulate the terminal to
action a repeated number of tasks to extract data and store in Excel. The
example below enters a bit of text and then actions the [enter] key.

I know I can use SendKeys and the like but the [enter] key throws up some
problems through SendKeys as the terminals I use don't always recognise the
[enter] passed by SendKeys.

Any suggestions on how I could change the format of the script below to work
within VBA would be much appreciated.

Cheers

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=testVB
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "12345ABCDE"
autECLSession.autECLOIA.WaitForInputReady
autECLSession.autECLPS.SendKeys "[enter]"
end sub