Comment utiliser Try Catch pour afficher l'échec de connexion pour la chaîne de connexion (App.Config)

Attribuez d'abord la valeur à la chaîne de connexion app.config :

My.Settings.Item("CustomerConnectionString") = "Data Source=FAROOK-PC\SQLEXPRESS;Initial 
Catalog= '" & Me.ComboBox1.Text & "'; uid = '" & Me.Login1.Text & "'; pwd = '" & 
Me.Password1.Text & "'"

Ensuite, utilisez Try Catch Block. Si la connexion échoue, utilisez votre boîte de message dans le bloc catch.

Dim sqlCnn As New SqlConnection
Dim connString as string = My.Settings.Item("CustomerConnectionString").value

Try
   sqlCnn = New SqlConnection(connString)
   sqlCnn.open()
   globalConnStr = connString
Catch ex As SqlException
   MsgBox("Login Failed")
Finally
   sqlCnn.close()
End Try

Déclarez globalConnStr comme variable globale et lorsque vous avez terminé la vérification des identifiants de connexion, attribuez la chaîne de connexion à globalConnStr. Après cela, vous pouvez utiliser la chaîne globalConnStr autant de fois que vous le souhaitez dans votre programme.