Comment créer une InputBox modale en VBscript?

bonjour,

Citation:

je n'ai pas trouvé comment créer une InputBox modale pour un script VBS!!!

hé bien, InputBox() peut-être...:mrgreen:

(extrait de la doc vbs : )

Citation:

Affiche une invite dans une boîte de dialogue, attend que l'utilisateur entre du texte ou choisisse un bouton et renvoie le contenu de la zone de texte.

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
Arguments
prompt
Expression de chaîne qui est affichée sous la forme d'un message dans la boîte de dialogue. La longueur maximum de l'argument prompt est environ 1024 caractères, selon la largeur des caractères utilisés. Si l'argument prompt se compose de plusieurs lignes, vous pouvez les séparer en utilisant un caractère de retour chariot (Chr(13)), un caractère de retour à la ligne (Chr(10)) ou une combinaison de ces deux caractères (Chr(13) & Chr(10)).
title
Expression de chaîne qui est affichée dans la barre de titre de la boîte de dialogue. Si vous omettez l'argument title, le nom de l'application s'affiche dans la barre de titre.
default
Expression de chaîne qui est affichée dans la zone de texte comme la réponse par défaut si aucune autre entrée n'est fournie. Si vous omettez l'argument default, la zone de texte s'affiche vide.
xpos
Expression numérique qui spécifie, en twips, la distance horizontale entre le bord gauche de la boîte de dialogue et le bord gauche de l'écran. Si l'argument xpos est omis, la boîte de dialogue est centrée horizontalement.
ypos
Expression numérique qui spécifie, en twips, la distance verticale entre le bord supérieur de la boîte de dialogue et le haut de l'écran. Si l'argument ypos est omis, la boîte de dialogue est positionnée verticalement, de manière approximative, à une distance d'un tiers de la taille de l'écran à partir du haut.
helpfile
Expression de chaîne qui identifie le fichier d'aide à utiliser pour fournir l'aide contextuelle de la boîte de dialogue. Si l'argument helpfile est fourni, l'argument context doit l'être aussi.
context
Expression numérique qui identifie le numéro de contexte de l'aide affecté par l'auteur de l'Aide à la rubrique d'aide correspondante. Si l'argument context est fourni, l'argument helpfile doit l'être aussi.
Notes
Lorsque les arguments helpfile et context sont tous deux fournis, un bouton d'aide est ajouté automatiquement à la boîte de dialogue.

Si l'utilisateur clique sur OK ou appuie sur ENTRÉE, la fonction InputBox renvoie ce qui se trouve dans la zone de texte. Si l'utilisateur clique sur Annuler, la fonction renvoie une chaîne de longueur nulle ("").

L'exemple ci-dessous utilise la fonction InputBox pour afficher une boîte de saisie et affecter la chaîne à la variable Input :

Dim Input
Input = InputBox("Entrez votre nom")
MsgBox ("Vous avez entré: " & Input)

sinon parmi toutes les solutions possibles, celle-ci également