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
Merci d'avance
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
Partager