Discussion :

[nico0807]

Donc je voudrais arreter mon apli si le bouton annuler est préssé dans une boite de dialogue
mon apli :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
m=0
k=prenom
k=inputbox("Que cherchez vous ?")
Dim IE
Set IE = Wscript.CreateObject("InternetExplorer.Application")
IE.Visible = 1 
IE.navigate "http://www.google.fr/search?hl=fr&q=" & k

ça sert a rechercher sur internet ...

[ProgElecT]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim k
k = InputBox("Que cherchez vous ?")
If k <> "" Then
 Dim IE
 Set IE = Wscript.CreateObject("InternetExplorer.Application")
 IE.Visible = 1
 IE.navigate "http://www.google.fr/search?hl=fr&q=" & k
End If

[nico0807]

Merci , ca marche !
Euh non en fait puisque la c'est juste si on marque rien et pas si on annule ..

[ProgElecT]

Ce que dit MSDN

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

Chez moi j'ai bien ce compertement.

[nico0807]

ah oui merci , désolé de te ravoir dérangé pour rien ... -_-'