Tapez la variable de type chaîne comme texte VBS

Question

Je suis nouveau en VBS, j'essaie juste de comprendre comment je peux exécuter un script qui demande à l'utilisateur une entrée, puis tape ce résultat en tant que partie d'une phrase?

J'utilise WshShell.SendKeys car je veux que le script soit flexible et capable d'entrer le texte dans différents programmes, y aurait-il un moyen de faire en sorte que cela tape quelque chose qui a été saisi dans une InputBox?

Merci!

Answer 1

Ceci est un exemple très simple de comment utiliser InputBox pour prendre votre entrée, puis envoyer les touches à une fenêtre d'invite de commandes. Je pense que vous pouvez facilement adapter cela pour tout autre programme.

Option Explicit

Dim a
a = InputBox("Entrez votre nom", "Exemple")

Dim sh
Set sh = WScript.CreateObject("WScript.Shell")
sh.Run "cmd"
WScript.Sleep 200 
sh.AppActivate "C:\Windows\system32\cmd.exe" 
WScript.Sleep 200 
sh.SendKeys "echo Bonjour " & a & "!"
sh.SendKeys "{ENTER}"

Lorsque vous exécutez ceci et entrez le mot "CrowStorm", CMD s'ouvrira et affichera la phrase "Bonjour CrowStorm!"