Problème avec le get "long" de ADO.NET
Salut
j'arrive a bien recuperer une valeur string de ma base de donne access mais je n'arrive pas a recupere une valeur numerique.
access 2003
visual studio express 2010
Code:
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
|
Imports System
Imports System.Data
Imports System.Data.OleDb
Public Class FichierCentral
Dim conn As New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & My.Settings.PathBD)
Dim connSql As OleDbCommand = conn.CreateCommand()
dim TableauAffiche(10) As Long
Private sub chargerLesActions()
Dim xx As Integer
conn.Open()
xx = 1
connSql.CommandText = "SELECT POURCENTAGE FROM ACTIONX WHERE TCID=" & FicheImpliquer & " ORDER BY HIERARCHIE ASC"
Dim connCap As OleDbDataReader = connSql.ExecuteReader()
Do While connCap.Read()
TableauAffiche(xx) = connCap.GetInt64(0)
xx = xx + 1
Loop
connCap.Close()
conn.Close()
ChargerLesActions = 1
End Function
End Class |
Merci d'avance