Interaction and SendKeys

[Albert]

Hello.
I use an econometric program called Stata.
I want a procedure that sends a command to Stata's Command Window.
I have created one but it works sporadically. Perhaps someone has some
suggestions? Maybe an option that does not involve SendKeys?
Here's the code I'm using.

Dim ReturnValue
ReturnValue = Shell("C:\Stata9\wsestata.exe", vbMaximizedFocus)
VBA.Interaction.AppActivate ReturnValue, True
Application.SendKeys "This is the command to send to Stata"

Thanks!
Albert C

 

[Jim Thomlinson]

Using send keys is generally unreliable. Does Stata have an API allowing you
to interface with the program?

 

[Albert]

Hello Jim.
Unfortunately I've found no DLL or API. There is only a .exe, but when I try
to make the reference in VBA, I get a "Can't make reference to that file"
message.