Dyrk.org - Do You Really Know

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

Publié le 20 avril 2016 par #Ro0t

Windows_+_R

 

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é …

 

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

 

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«