VBScript : Conditions avec msgbox... HELP !
Résolu
Bonjour,
Je viens de me mettre au vbscript et j'ai besoin de votre aide !
voici mon bout de code :
msgbox "Lancer programme?", vbQuestion+vbYesNoCancel, "Lancer programme"
If response =Yes Then
msgbox "programme lancé"
Elseif response = No Then
msgbox "programme terminé"
Else
msgbox "Annulation"
End If
Et devinez quoi... Ca marche pas -_-'
Je sais pas ce qu'il faut mettre à la place de response = yes.
J'ai essaye avec answer, msgbox,msgboxresponse,... mais ca marche tjs pas
Quelqu'un aurait-il la solution svp?
Merci d'avance
Superbeaugosse
--
Pour une carotte, le lapin est l'incarnation absolue du Mal !
Je viens de me mettre au vbscript et j'ai besoin de votre aide !
voici mon bout de code :
msgbox "Lancer programme?", vbQuestion+vbYesNoCancel, "Lancer programme"
If response =Yes Then
msgbox "programme lancé"
Elseif response = No Then
msgbox "programme terminé"
Else
msgbox "Annulation"
End If
Et devinez quoi... Ca marche pas -_-'
Je sais pas ce qu'il faut mettre à la place de response = yes.
J'ai essaye avec answer, msgbox,msgboxresponse,... mais ca marche tjs pas
Quelqu'un aurait-il la solution svp?
Merci d'avance
Superbeaugosse
--
Pour une carotte, le lapin est l'incarnation absolue du Mal !
Configuration: Windows Vista Firefox 2.0.0.8
7 réponses
-
Bonjour,
Va a cette adresse tu trouveras ton bonheur
http://www.commentcamarche.net/vbscript/vbs constantes.php3#msgbox -
MEA CULPA.....
Quand tu utilises une variable pour récupérer la réponse d'une msgbox il faut mettre des parenthèses après msgbox
reponse = msgbox ( "Lancer programme?", vbQuestion+vbYesNoCancel, "Lancer programme" ) -
Salut,
Si tu disposes de Excel, ouvre VisualBasic, puis demande au compagnon, il y a même des exemples.
J'ai utilisé des MsgBox, et si l'aide de MSOffice ne te donne pas de réponse, je te donnerai le code que j'ai utilisé.
A+ -
Ok mais je connait pas le nom de la vairable que renvoie msgbox
ca donnerait:
if "nom-variable" = 6 then
...
alors c est quoi son nom?? -
j ai essaye mais quand je lance le script ca m affiche une fenetre qui dit :
Ligne : 1
Caract : 18
Erreur : Fin d'instruction attendue
Code : 800A0401
Source : Erreur de compilation Microsoft VBScript
et a la ligne 1 caractere 18 c est l espace entre msgbox et la "
reponse = msgbox "lancer programme", ...
je comprend pas -_-'
-
merci bcp tu es mon sauveur!!!! lol
ca prouve qu il faudrais que qq se mette a ecrire un bon tuto de VBScrip^^
-
EH OUI, il faut initialiser une variable qui bva récupérer la valeur du bouton de ta "msgbox"
reponse = msgbox "Lancer programme?", vbQuestion+vbYesNoCancel, "Lancer programme"
ensuite tu pourras faire
if reponse = 6 then
ou alors tu utilises select case
select case reponse
case 1
instructions
case 2
instructions
...
end select
