Salut

J'ai une connection ODBC et je veux être capable d'aller chercher des valeurs dans une table mais j'ai toujours une erreur que je ne sais foutument pas c quoi!

"var_priori" correspond à un numéro contenu dans ma table.

Mon code :

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
Try
Me.MonAdapteurF0005.SelectCommand = Me.SelectCommandF0005
 
Dim var_Descrip1 As String
Dim var_Descrip2 As String
 
Me.SelectCommandF0005.CommandText = "SELECT DRKY,DRDL01,DRDL02 FROM F00051 WHERE DRKY = ?"
Me.SelectCommandF0005.Connection = Me.MaConnectionAS400
Me.SelectCommandF0005.Connection.Close()
Me.SelectCommandF0005.Connection.Open()
 
Me.SelectCommandF0005.Parameters.Add("@DRKY", OdbcType.NVarChar)
Me.SelectCommandF0005.Parameters("@DRKY").Value = var_priori
 
Dim MonReader As OdbcDataReader = Me.SelectCommandF0005.ExecuteReader()
While MonReader.Read
    Try
         var_Descrip1 = CType(MonReader("DRDL01"), String)
         var_Descrip2 = CType(MonReader("DRDL02"), String)
    Catch ex As Exception
    End Try
End While
MonReader.Close()
Me.SelectCommandF0005.Connection.Close()
et j'obtiens toujours cette erreur :
***À noter que l'erreur survient juste avant qu'il ne passe dans mon while...***

ERROR [42S02][IBM][iSeries Access ODBC Driver][DB2 UDB]SQL0204 - F00051 in LIBTDTA type *FILE not found.
Y'a quelqu'un qui peut m'expliquer cette erreur en bon francais!

Merci