Header Ads

Capturando telas com vbscript



Capturando telas com vbscript.

Segue pequeno programa em vbscript, para captura de telas, este pequeno script faze-rá o seguinte, ao clicar no mesmo ele captura a tela e em seguida cola esta no Mspaint ou Word. Ou como preferir, a ideia é de certa forma automatizar as tarefas.

Basta copiar o código abaixo e colar em um bloco de notas, e salvar com um nome de sua preferência com a extensão .vbs.


Set Wshshell=CreateObject("word.basic")
'ativar a tecla prtScr
WshShell.sendkeys "(%{1068})"
'time 1500 mile segundos
WScript.Sleep 1500

set Wshshell = WScript.CreateObject("WScript.Shell")
'executa Mspaint
wshshell.run "mspaint"
WScript.Sleep 500

WshShell.AppActivate "word"
WScript.Sleep 5000
'ativa as teclas control C e control V
wshshell.SendKeys "^{v}"
WScript.Sleep 1500



Nenhum comentário

Interaja dê sua opinião, pois o espaço de comentário foi feito pra você.Sei que você é uma pessoa inteligente e usará este espaço com palavras inteligentes. E não usará comentários ofensivos e nem palavras de baixo calão.