[vb.net] fermer l'application en cas de bug

Alors voila mon problème, je pense que vous allez pouvoir m'aider.

J'ai une application qui se connecte à une base sql au lancement, je veux que si elle réussie à établir la connection, le programme se lance et que dans le cas ou la connexion échoue, un petit msgbox nous dise byby !

voici mon code

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load   ConnectDataBase()   Dim str As String = "SELECT name from company" Dim Command As New SqlCommand(str, myConnection) Dim Reader As SqlDataReader = Command.ExecuteReader   End Sub

---

et ma fonction connect est défini avec un try !

Code:

---

1 2 3 4 5 6 7 8 9 10

Public Function ConnectDataBase() Try myConnection.ConnectionString = "database=" + databaseName + " ; server=" + serverName + " ; User ID=" + userId + " ; pwd=" + password myConnection.Open() Catch ex As Exception MsgBox("Connection failed : " & ex.Message, MsgBoxStyle.Critical) Application.Exit() End Try End Function

---

et en fait le msgbox fonctionne mais pas le application.exit()

Salut

Essaie la fermeture de l'application en dehors du catch, soit en verifiant que le State de ta myConnection est bien "open", soit en retournant un booleen, declare en dehors du try-catch, que tu metterais a true ou false dans le catch (et tu referme l'appli en fonction)

(et utilise un stringbuilder si t'as plus de 4 concatenations de texte a faire)

Oui il vaut mieux éviter les exit dans un catch ou un finally et faire l'opération quand on est sorti du bloc.

c'est vrai que j'ai remarqué que des exit sub ne marchais pas non plus.
Pour la connection sa peux encore aller mais dans certains cas, sa va etre chiant a tester en dehosr du catch.
pour la connection, je fais

Code:

---

1 2 3 4

If (myConnection.State = 0) then exit.application()

---

Salut,
j'ai peut étre mal compris ton probléme, mais si tu faisait simplement un End à la place de Application.Exit().

Comme ça:

Code:

---

1 2 3 4 5 6 7 8 9 10

Public Function ConnectDataBase() Try myConnection.ConnectionString = "database=" + databaseName + " ; server=" + serverName + " ; User ID=" + userId + " ; pwd=" + password myConnection.Open() Catch ex As Exception MsgBox("Connection failed : " & ex.Message, MsgBoxStyle.Critical) End End Try End Function

---

J'ai de mon coté eu quelques soucis (dans certains cas) pour arriver à interrompre un programme (par exemple dans une boucle, le 'end' ne fonctionnait pas !!).
Ce que j'ai trouvé qui fonctionne à tous les coups, c'est

Code:

---

1 2	System.Environment.Exit(0)

---

Ceci dit, je ne sais pas dans quel état je laisse la machine !!

Application.Exit() attend que tout les threads et toutes les boucles soient terminés avant de fermer l'application.
si ça ne se ferme pas c'est qu'il y a autre chose qui tourne dans ton application !

System.Environment.Exit(0) je suis pas sur mais je crois que sa crashe l'appli et renvoie le code spécifié !
à savoir : MicroSoft considère toute valeur <> 0 comme un code d'erreur !

perso je préfere "Application.Exit()".