Cmd 从命令提示符发送密钥

Cmd 从命令提示符发送密钥,cmd,sendkeys,Cmd,Sendkeys,有没有办法从命令提示符使用sendkeys(或类似的东西)(而不是到命令提示符?您可以使用vbscript。例如,此脚本将使扬声器静音 set shell = CreateObject("WScript.Shell") shell.run"Sndvol" WScript.Sleep 1500 shell.SendKeys"{TAB}" shell.SendKeys" " shell.SendKeys"%{F4}" 您可以使用以下命令从控制台启动它: cscript mute.vbs 更多信息

有没有办法从命令提示符使用sendkeys(或类似的东西)(而不是到命令提示符?

您可以使用vbscript。例如,此脚本将使扬声器静音

set shell = CreateObject("WScript.Shell")
shell.run"Sndvol"
WScript.Sleep 1500
shell.SendKeys"{TAB}"
shell.SendKeys" "
shell.SendKeys"%{F4}"
您可以使用以下命令从控制台启动它:

cscript mute.vbs

更多信息这里是一个单线解决方案: 此行将键入“Testing 123”,然后点击Enter

echo >script.vbs set shell = CreateObject("WScript.Shell"):shell.SendKeys "Testing 123{ENTER}" & script.vbs

不创建临时文件。 显示“循环”只是为了让您可以打开笔记本进行输出。之后将其移除

    @echo off
        :loop
            ::------------begin main code------------
            set command=new ActiveXObject('WScript.Shell').SendKeys('WoW{ENTER}{ENTER}');
            for /f "delims=" %%i in ('mshta "javascript:%command%close(new ActiveXObject('Scripting.FileSystemObject'));"') do set "var=%%i"
            ::-------------end main code-------------
            timeout /t 1 /nobreak >nul
        goto :loop

我正在使用:
Dim WshShell:Set WshShell=WScript.CreateObject(“WScript.Shell”)WshShell.SendKeys WScript.Arguments(0)