激活窗口发送回车键

sendenter.vbs

Dim app
Set app =CreateObject("Wscript.Shell")
app.AppActivate "C:\Windows\system32\cmd.exe"
app.SendKeys ""
wscript.sleep 500
Set app=Nothing

常用的按键

objwsh.SendKeys strRead    '向当前活动窗口发送按键
'下面是操作键的发送代码
退格键             、 或 
BREAK              
CAPS LOCK          
DEL 或 DELETE       或 
向下键             
END                
ENTER               或 ~
ESC                
HELP               
HOME               
INS 或 INSERT       或 
向左键             
NUM LOCK           
PAGE DOWN          
PAGE UP            
向右键             
SCROLL LOCK        
TAB                
向上键             
F1 至 F12           至 
SHIFT              +
CTRL               ^
ALT                %
+ { 等修饰符       {+} { {^} } {%}
'如果在按 e 和 c 的同时按 SHIFT 键，则发送字符串参数 +(ec)
'可发送一个键的重复键击。如10次x，为{x 10}，但不可发送10次组合键，如Ctrl+x
'不能发送 PRINT SCREEN 键 
'常用 Wscript.Sleep 来延时若干毫秒发送按键，避免程序来不及响应