Bonjour! voilà: je cherche à faire le truc de base et c limite déprimant de pas y arriver...

Je veux remplir une listebox avec un datareader. Jusque là facile..
Mon code donne ça:

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
 
Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As
 System.EventArgs) Handles MyBase.Load
  'declaration de variables
 
  'declaration de la connexion
  Dim cnxTestStr As String = "Data Source=mabase ;server=monserveur"
  Dim cnxTest As New SqlConnection(cnxTestStr)
 
  ' declaration de la commande
  Dim cmdVsd As SqlCommand = New SqlCommand("select distinct versdeb
 from niveau", cnxTest)
  Dim rdrVsd As SqlDataReader
 
  ' ouverture de la connexion
  cnxTest.Open()
 
  rdrVsd = cmdVsd.ExecuteReader()
 
  ' remplissage de la listbox
  MessageBox.Show("remplissage de listebox")
  lbxVs.Items.Clear()
  Do While rdrVsd.Read()
    lbxVs.Items.Add(rdrVsd.GetDecimal(4))
  Loop
 
  'fermeture
 
   rdrVsd.Close()
   cnxTest.Close()
 
End Sub


Je compile et mon programme bug à l'expression

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
rdrVsd = cmdVsd.ExecuteReader()
et il me renvoie l'erreur suivante...
"An unhandled exception of type 'System.Data.SqlClient.SqlException' occurred in system.data.dll
Additional information: System error."
J'ai essayé de déclarer ce maudit datareader de plusieurs manières, (avant la connection, après) et rien n'y fait.. Je commence à désespérer ( un ti peu )
A quoi Pourrai être due cette erreur?

Merci!!