Discussion :

[VinceVR38]

Bonjour à tous,

Nouveau sur le forum, je me tourne vers vous pour m'aider à résoudre un problème que je n'arrive pas à solutionner, malgré des heures et des heures de recherches et de tests.

Je me suis lancé dans le développement d'une application métier pour ma nouvelle activité professionnelle.
Le gros de l'application se base sur de la lecture/écriture en base.

Je cherche à réaliser une fonction que je puisse appeler afin d'ouvrir un connexion à la base et effectuer un test de validité de connexion,
pour ensuite pouvoir faire mes requêtes.

Le code fonctionne correctement lorsque je le copie/colle aux endroits où il est nécessaire.
Par contre quand je le place dans une fonction et que je l'appelle dans le code d'une autre Form, cela ne fonctionne pas.

Auriez-vous s'il vous plaît une idée de ce que je peux rater?

Merci d'avance

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
Class BDD
        Shared server As String = "127.0.0.1"
        Shared prt As String = "3306"
        Shared user As String = "root"
        Shared pass As String = "************"
        Shared db As String = "dbs*******"
        Shared conn As MySqlConnection
        Shared str As String
        Shared cmd As New MySqlCommand
        Shared dr As MySqlDataReader
 
        Shared Function TestConnexionDB() As Boolean
            Try
                str = "server=" & server & ";user=" & user & ";database=" & db & ";port=" & prt & ";password=" & pass
                conn = New MySqlConnection(str)
 
                If conn.State = ConnectionState.Closed Then
                    conn.Open()
                    If ConnectionState.Open Then
                        Return True
                        conn.Close()
                    Else Return False
                        'MessageBox.Show("Connection BDD Failed!", "Connection", MessageBoxButtons.OK, MessageBoxIcon.Information)
                    End If
 
                End If
            Catch ex As Exception
                MessageBox.Show(ex.Message.ToString)
            End Try
 
        End Function
 
        Shared Function OpenConnexionDB()
            Try
                str = "server=" & server & ";user=" & user & ";database=" & db & ";port=" & prt & ";password=" & pass
                conn = New MySqlConnection(str)
 
                If conn.State = ConnectionState.Closed Then
                    conn.Open()
                    If ConnectionState.Open Then
                        Return True
                    Else
                        Return False
                        MessageBox.Show("Connection BDD Failed!", "Connection", MessageBoxButtons.OK, MessageBoxIcon.Information)
                    End If
                End If
            Catch ex As Exception
                MessageBox.Show(ex.Message.ToString)
            End Try
        End Function

[popo]

Il est très joli ton code, tout en transparence.
Tellement transparent qu'on a du mal à le voir !!

[VinceVR38]

Il est très joli ton code, tout en transparence.
Tellement transparent qu'on a du mal à le voir !!

Désolé, avec les bonnes balises ça semble ok et lisible

[umfred]

Return fait sortir directement de la fonction donc les instructions situées après ne sont pas exécutées.
Les chemins qui passeraient par les catch, ne retournent à priori rien (il doit y avoir des warning à ce sujet)
Sinon comment utilises-tu ta classes et qu'est-ce qui ne fonctionne pas ? (message d'erreur)

[binarygirl]

Il semble y avoir un problème de scope de variable aussi je pense.
Ceci devrait être probablement déclaré comme Public Shared:

Code :

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

 Shared conn As MySqlConnection

Mais à voir comment cette classe est appelée.
Et comme dit plus haut, Return a pour effet de quitter la routine immédiatement et le code qui suit ne sera pas exécuté (exemple: conn.Close() dans TestConnexionDB), à moins d'utiliser une directive Finally pour du "cleanup" au sein d'un bloc try/catch.

Mais en réalité, cette routine TestConnexionDB est parfaitement inutile et redondante. Tout ce que vous devez faire c'est utiliser OpenConnexionDB et fermer la connexion une fois le test accompli.

Ici la connexion se fait en local mais pour une connexion réseau, il peut être utile de gérer la reconnexion en cas de coupure réseau.

[VinceVR38]

Il semble y avoir un problème de scope de variable aussi je pense.
Ceci devrait être probablement déclaré comme Public Shared:

Code :

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

 Shared conn As MySqlConnection

Mais à voir comment cette classe est appelée.
Et comme dit plus haut, Return a pour effet de quitter la routine immédiatement et le code qui suit ne sera pas exécuté (exemple: conn.Close() dans TestConnexionDB), à moins d'utiliser une directive Finally pour du "cleanup" au sein d'un bloc try/catch.

Mais en réalité, cette routine TestConnexionDB est parfaitement inutile et redondante. Tout ce que vous devez faire c'est utiliser OpenConnexionDB et fermer la connexion une fois le test accompli.

Ici la connexion se fait en local mais pour une connexion réseau, il peut être utile de gérer la reconnexion en cas de coupure réseau.

Bon, je reprends ce message de ma part qui n'est plus que partiellement utile.
Voir mon dernier post.

Reste cet aspect qui m'intéresse beaucoup:
A terme, j'aimerais effectivement taper un bdd distante, mais je n'ai pas la moindre idée de comment gérer la reconnexion en cas de coupure réseau.
Ceci dit je prend bonne note de ce point et vais tâcher de creuser la question!

[VinceVR38]

Return fait sortir directement de la fonction donc les instructions situées après ne sont pas exécutées.
Les chemins qui passeraient par les catch, ne retournent à priori rien (il doit y avoir des warning à ce sujet)
Sinon comment utilises-tu ta classes et qu'est-ce qui ne fonctionne pas ? (message d'erreur)

Alors, effectivement j'ai des warnings comme quoi les fonctions ne retournent pas une valeur pour tous les chemins du code.
Je ne comprenais pas pourquoi!
Je pensais que les Catch retournaient la Messagebox, hors, si les Return font sortir directement... forcément...
Il faut que je solutionne la suppression des Catch maintenant

J'ai essayé de comprendre et de m'inspirer de code glané sur le net, mes bases limitées de VB remontent à longtemps.
Je fais sans aucun doute des erreurs de débutant.


J'ai créé une classe Clients avec les variables et les procédures, une classe BDD pour les fonctions OpenConnection etc.
Je te passe le reste.
Pour le cas précis:
-Remplissage des champs du formulaire client
-Validation -> appel de procédure de la classe Clients pour récupérer les champs, former la requête SQL
-Appel de la fonction pour ouvrir la connexion à la base (dans ma procédure de la classe Clients)
-Lancer la requête

Je ne sais pas si je suis très clair.

Je peux essayer de c/c le code, mais je ne suis pas sûr que ce soit clair en dehors des containers respectifs.