Pass Text To Any App

[epixelman]

I want to sent text (using one button in VB) to any app that the app text box had the last focus.

I have already figured out how to find the app. But I can not get text to the app on a consistant basis.

I have Sendkeys working "^ & Chr(118)"
But it does not always work, especially in Word97.

Any help would be appreciated!

Thanks
ePixelman

[StevenHickerson]

First off I would like for you to share with me how you find the app ... I always thought sendkeys worked on the app and textbox currently in focus.

Which could explain why yours dosn't work consistantly .. if what I just said is true maybe your app isn't in focus sometimes and thus the reason it dosn't work.

[jemidiah]

To set focus to it, you can use the AppActivate method (or a mess of API's if you really wanted to ). MSDN has good info on it (http://msdn.microsoft.com/vbasic/).

[epixelman]

StevenHickerson,

I simply use a "Task Manager" type routine. Except my routine finds the app that is on top of zorder and takes the title name of the app.

It finds the window title, and the app stays the active app, but does not always recieve the sendkeys or something.

This is how is goes...
My VB form is topmost but hidden from the "TaskSwitch" routine.

I click a "Pass Text" button on my VB form. It first finds the app that is topmost (Say Word97) then copies text from a RTF box then it Sendkeys to app (say Word97)

Thanks

[jemidiah]

Try putting a DoEvents after the 'task switch' routine and before the SendKeys statement. If that doesn't work, post your code and we'll see what we can do with it.