[VBS] – Simuler le contrôle de touche « Windows + R »

Publié le 20 avril 2016 par #Ro0t

Coucou la compagnie !!!

Bon alors pour rentrer vraiment dans le vif du vif, j’ai enfilé mes bottes en caoutchouc et mon ciré jaune …

Il n’est pas

POSSIBLE

de simuler l’appui de la touche Windows …
Pour des raisons « évidente » de sécurité …
Cette touche est normalement réservée à l’OS …

Proof of concept ultra méga technique ^^

Vous entrez dans un programme … vous appuyez sur la touche Windows et … pouf … vous êtes sorti du programme …

Pour ceux qui souhaiteraient juste simuler cette touche …
Il suffit de faire « Ctrl + Echap »

Pour les autres que le sujet intéresse, j’ai réalisé pour vous une petite fonction VBS qui va vous permettre de faire votre « Windows+R » de manière détourné …

[pastacode lang= »java » message= » » highlight= » » provider= »manual »]

Sub WindowsR(command)
	Set x = WScript.CreateObject("WScript.Shell")
	x.run "taskmgr"
	WScript.Sleep 100
	x.AppActivate "taskmgr"
	x.SendKeys "%{c}N"
	WScript.Sleep 100
	x.SendKeys command
	x.SendKeys "{Enter}"
	Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") 
	Set colProcess    = objWMIService.ExecQuery("Select * from Win32_Process Where Name = 'taskmgr.exe'")
	For Each objProcess in colProcess
		objProcess.Terminate()
	Next 	
End Sub

[/pastacode]

Testé uniquement sur un Windows en français …

WindowsR « mspaint«

Cette fonction consiste à ouvrir le gestionnaire de tâche et envoyer les bons contrôles de touche pour naviguer dans les sous menu, jusqu’à accéder au fameux « exécuter«