Cmd 从命令提示符发送密钥
有没有办法从命令提示符使用sendkeys(或类似的东西)(而不是到命令提示符?您可以使用vbscript。例如,此脚本将使扬声器静音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 更多信息
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)