[megaloman]

На vbs это решается тоже.

Код:

ProgaName = "C:\WINDOWS\system32\notepad.exe"        ' Полный путь к программе

Set WS = CreateObject("WScript.Shell")

Set Arg = WScript.Arguments
N = Arg.Count

If N=0 Then
   Set theProga = WS.Exec(ProgaName)        ' Запустим программу
Else
   Set theProga = WS.Exec(ProgaName + " " + Arg(0) )        ' Запустим программу c параметром
End If

WScript.Sleep (10000)                     ' Ждем 10 секунд чтобы программа нормально запустилась. Время надо подобрать 

WS.AppActivate (theProga.ProcessID)      ' Активируем окно запущенного приложения

WS.SendKeys ("{ENTER}")                     ' Пошлём ENTER

Если что-то еще надо посылать, уточните постановку.