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 : 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
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