Bonjour à tous,
Je n'arrive pas tester si mon reader est vide ou pas.
Voici mon code actuel :
ça ne marche pas --> les lignes de commande placées après le If ne semblent jamais s'exécuter.
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 Do While myReader.Read() ' récupération de l'item dans le reader If myReader.Item(0) Is System.DBNull.Value Then MsgBox("inconnu") TextBox2.Text = "Inconnu" 'nom patrimonial TextBox3.Text = "Inconnu" 'nom marital TextBox4.Text = "Inconnu" 'prénom TextBox6.Text = "Inconnu" 'sexe TextBox5.Text = "Inconnu" 'ddn Else TextBox2.Text = StrConv(myReader.GetString(2), VbStrConv.Uppercase) 'nom patrimonial TextBox3.Text = StrConv(myReader.GetString(1), VbStrConv.Uppercase) 'nom marital TextBox4.Text = StrConv(myReader.GetString(3), VbStrConv.ProperCase) 'prénom TextBox6.Text = myReader.GetString(5) 'sexe TextBox5.Text = myReader.GetDateTime(4) 'ddn End If Loop
J'ai également essayésans succès...
Code : Sélectionner tout - Visualiser dans une fenêtre à part if not myReader.HasRows
Une idée ?
Bonne journée
Partager