Probléme if en Vbs

Résolu/Fermé
geekploy Messages postés 130 Date d'inscription dimanche 17 avril 2011 Statut Membre Dernière intervention 19 novembre 2014 - 17 oct. 2011 à 19:38
geekploy Messages postés 130 Date d'inscription dimanche 17 avril 2011 Statut Membre Dernière intervention 19 novembre 2014 - 22 oct. 2011 à 12:39
Bonjour,
étant actuellement un super novice en vbs, j'ai besoins de votre aide.
je voudrais faire ouvrir un programme si on clic sur "non", et si on clic sur "oui" je voudrais faire ouvrir un autre programme ... après mettre arranger pour trouver un code sur internet et l'avoir transformer à ma manière je me retrouve coincé,
Voici le bout de code qui coince.

If MsgBox(sMsg, vbInformation Or vbYesNoCancel, "livre de l'internat 2009-2012") = VbNo Then RunUrl(sLink)
If MsgBox(sMsg, vbInformation Or vbYesNoCancel, "livre de l'internat 2009-2012") = VbYes Then Shell"C:\...\.exe)

ça ne fonctionne pas comme je veux puisque ça ouvre deux fois le même message.. je voudrais savoir comment faire pour que si on clic sur oui ça fasse ça et si on clic sur non ça fasse ceci

Merci pour vos futures réponses

ps: je pense me tromper sur la commande Shell, ce n'est pas comme ça pour éxécuter un programme ?

1 réponse

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
18 oct. 2011 à 07:44
Bonjour,

Reponse = MsgBox(sMsg, vbInformation Or vbYesNoCancel, "livre de l'internat 2009-2012")
If Reponse = vbYes Then
Shell "C:\...\.exe) "
ElseIf Reponse = vbNo Then
RunUrl (sLink)
End If

C'est ce qui se fait en general

Bonne suite
1
geekploy Messages postés 130 Date d'inscription dimanche 17 avril 2011 Statut Membre Dernière intervention 19 novembre 2014 2
22 oct. 2011 à 12:39
Merci beaucoup je me doutais bien que c'était quelque chose dans le genre mais j'arrivais pas à concrétiser.
0