Étape 3: Copiez ce script dans le bloc-notes (activation de la voix)
Set wshshell = wscript. CreateObject("wscript.shell")
Dim Input
WshShell.Run "%windir%\Speech\Common\sapisvr.exe - SpeechUX"
SAPI.Speak « s’il vous plaît parler, ou taper, ce que vous voulez ouvrir? »
Entrée = inputbox ("s’il vous plaît parler, ou taper, ce que vous voulez ouvrir. »)
Si Input = « youtube » ou Input = « Youtube » then
SAPI.Speak « Ouverture youtube »
WshShell.Run « www.youtube.com »
d’autre
Si Input = « instructables » ou Input = « Instructables » puis
SAPI.Speak « Ouverture instructables »
WshShell.Run « www.instructables.com »
d’autre
Si Input = « google » ou Input = « Google » then
SAPI.Speak « Ouverture google »
WshShell.Run « www.google.com »
d’autre
Si Input = « command prompt » ou Input = « Command prompt » then
SAPI.Speak « Ouverture command prompt »
WshShell.Run « cmd »
d’autre
Si Input = « calculatrice » entrée ou = « Calculatrice » then
SAPI.Speak « Calculatrice d’ouverture »
WshShell.Run « calc »
d’autre
Si Input = « bloc-notes » ou Input = « Bloc-notes » then
SAPI.Speak « Bloc-notes d’ouverture »
WshShell.Run « bloc-notes »
d’autre
Si Input = "" alors
d’autre
SAPI.Speak « Je ne reconnais votre entrée, essayez s’il vous plaît quelque chose d’autre »
fin si
fin si
fin si
fin si
fin si
fin si
fin si