Batchfil til kls mail backup

Hej er der en som kan hjælpe med at få "ALT" key til at virke
har nu prøvet en uge vil spørge om nogen har en ide.

Option Explicit
Dim objShell

set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "klsmailbackup.exe"
Wscript.Sleep 5000
objShell.AppActivate "klsmailbackup 2.0.0.0"
Wscript.Sleep 5000
objShell.SendKeys "%"
Wscript.Sleep 5000


Venlig Hilsen fra

Mogens