3
拍摄活动窗口的屏幕截图。Vbscript打印屏幕到MSpaint
Set Wshshell=CreateObject("Word.Basic")
WshShell.sendkeys"%{prtsc}"
WScript.Sleep 1500
运行Mspaint和粘贴。
set Wshshell = WScript.CreateObject("WScript.Shell")
Wshshell.Run "mspaint"
WScript.Sleep 500
WshShell.AppActivate "Paint"
WScript.Sleep 500
WshShell.sendkeys "^(v)"
WScript.Sleep 1500
这里,以活动窗口的截图操作工作正常.. 此外,它开始与MSPAINT,但内容没有在内线文件被粘贴。