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

Question

我已经启动了一个命令行MP3播放器(Fmedia(。如何在该应用程序运行时向其发送(热键(命令？我有PID。

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

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

Answer 1

您可以使用

SendKeys发送热键。

关于它的文档有一个示例，几乎正是您想要的。我已经根据您的需求进行了调整：

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

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