Probléme if en Vbs
Résolu
geekploy
Messages postés
144
Statut
Membre
-
geekploy Messages postés 144 Statut Membre -
geekploy Messages postés 144 Statut Membre -
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 ?
é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 ?
A voir également:
- Probléme if en Vbs
- Vbs windows - Accueil - Optimisation
- If exist - Forum Programmation
- Vbs - Télécharger - Édition & Programmation
- Fichier vbs - Forum VB / VBA
- Vbs runauto - Forum Virus
1 réponse
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
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
geekploy
Messages postés
144
Statut
Membre
2
Merci beaucoup je me doutais bien que c'était quelque chose dans le genre mais j'arrivais pas à concrétiser.
