向正在运行的cmd进程发送命令

Question

我已经启动了命令行MP3播放器（Fmedia）。如何将（热键）命令发送到该应用程序。它何时运行？我有PID。

除了杀死正在运行的进程的方法之外，我似乎找不到它。

Dim strApp, PID
strApp = "C:\Take5-V4\fmedia\fmedia-gui.exe """ & strFilename & """"
PID = Shell(strApp, vbNormalFocus)

Answer 1

您可以使用SendKeys发送热键。

上面的documentation的例子几乎就是您想要的。我已根据您的需求进行了调整：

Dim strApp, PID
strApp = "C:\Take5-V4\fmedia\fmedia-gui.exe """ & strFilename & """"
PID = Shell(strApp, vbNormalFocus)
AppActivate PID
SendKeys "A", True 'Sends the A key to your program.

如果您不想激活应用程序，仍然可以通过WinAPI SendMessage方法来实现，但是要复杂得多。