Bonjour à tous,
Je soumet une requête a mon serveur MySql. Puis je récupère la valeur de retour. Cependant il se peut qu'il n'y ait pas de valeur correspondante dans la table.
Je ne parviens pas à réaliser un test cohérent avant d’exécuter ma requête.

Voir le ? ci dessous :
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
Dim Commande_SQL_Code_article As New MySqlCommand("SELECT ARTICLE FROM article WHERE (CODE_2=@Code_secondaire);", Connection_SQL)
Dim Adapter_SQL As New MySql.Data.MySqlClient.MySqlDataAdapter
Dim Data_SQL As MySql.Data.MySqlClient.MySqlDataReader

Connection_SQL.ConnectionString = "chaine_de_connexion"
Connection_SQL.Open()

Commande_SQL_Code_article.Parameters.AddWithValue("@Code_secondaire", Code_secondaire)
                Adapter_SQL.SelectCommand = Commande_SQL_Code_article
                Data_SQL = Commande_SQL_Code_article.ExecuteReader()
                Data_SQL.Read()
                'MsgBox("Code secondaire : " & Code_secondaire & Chr(10) & "Retour requete : " & Data_SQL.GetString("ARTICLE") & Chr(10) & "Nombre : " & Data_SQL.GetString("ARTICLE").Count)
                MsgBox(Commande_SQL_Code_article.)
                If ? Then
                    Code_article = Data_SQL.GetString("ARTICLE")
                Else
                    GoTo Suivant
                End If
                Data_SQL.Close()
                Commande_SQL_Code_article.Parameters.Clear()
Je vous remercie par avance.
A plus.