fermer la fenêtre après exécution d'un shell

Bonjour,

Voici mon problème.

Je souhaite faire un message d'attente le temps que plusieures commandes s'exécutent.

Voici ce que j'ai fait.

Dans ma form principale:

Code:

---

1 2 3

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click attente.ShowDialog() End Sub

---

Cela m'ouvre donc une autre form qui m'affiche "veuillez patienter..." et j'ai ceci :

Code:

---

1 2 3 4

Private Sub UserForm_Activate() Shell("attente.bat", AppWinStyle.Hide) Me.Close() End Sub

---

Dans le bat je fais 5 ping de ma boucle locale (5 secondes car c'est juste pour le test).

Donc quand je clique sur le bouton, la fenêtre "veuillez patienter ..." s'affiche bien mais ne se ferme pas à la fin de mon bat...

Et la je bloque...
Avez-vous des idées?

Merci d'avance!!

alors j'ai fait ça pour que ça s'exécute au chargement de la form...

Code:

---

1 2 3 4

Public Sub attente_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Shell("attente.bat", AppWinStyle.Hide) Me.Close() End Sub

---

Mais la rien ne s'affiche même pas le message veuillez patienter (enfin si mais quelques millisecondes)

Salut.

Essaye comme ceci :

Code:

---

1 2 3 4

Public Sub attente_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Shell("C:\Users\Administrateur\Desktop\attente.bat", AppWinStyle.Hide, True) Me.Close() End Sub

---

Le troisième paramètre que je te fais ajouter est la valeur indiquant si la fonction Shell doit attendre la fin du programme. Le premier doit contenir l'emplacement de ton fichier. Le "path" en entier. De cette façon, tu devrais arriver à tes fins :ccool:

Tient nous au courant.

yes parfait avec le paramètre "true".
Merci beaucoup ++ :ccool: