[VBScript/HTA] SendKeys Alternative Help

AoN · Aug 1, 2012

The name should say it all. I have an HTML Application, that uses VBScript to execute the SendKeys function. Before everyone starts yelling that I shouldn't use it, doesn't matter. This is a program used by a small group of people whom have been using it for years in XP, so they know how not to screw-up.

Basically, I need to make it usable in Win7. I know that SendKeys has issues in 7 and Vista, but I haven't gotten a single alternative to work. Simply put, I need a way to replace the SendKeys function to still Alt+Tab to the last viewed window and push a block of text, provided via external text file, to wherever the user left the cursor active in that window.

Here's the original code for XP, minus most of the stuff not related to the actual SendKeys function:

Code:

Dim WSH set WSH =  CreateObject("WScript.Shell")

Dim sendStr case "SEND"
set sendStr = arrKeys(2,intKeyNum) WSH.SendKeys "%({TAB})" & Replace(sendStr,vbCrLf,"~")

Works up to, and including, the setting of sendStr in Win7, just not the SendKeys. If you require the full code, I can provide it via PM, but I don't see why it would be needed. Ideas?

Search

Search

[VBScript/HTA] SendKeys Alternative Help

AoN

Internet Programmer