Bonjour,
J'utilise Delphi 7.
J'ai besoin de lire un fichier Excel. Pour cela j'utilise ADO qui me permet de charger un CDS.
Mes composants :
Le code de chargement des données :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5var ADOTable1: TADOTable; ADOConnection1: TADOConnection; cds1: TClientDataSet; dsp1: TDataSetProvider;
Le problème est que j'ai une colonne qui contient des numéros des séries, composés de chiffres et de lettres. La colonne est détectée comme un ftFloat, toutes les valeurs avec des lettres se trouvent alors ignonrés (valeurs vides).
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 try ADOConnection1.Connected := False; ADOTable1.Active := False; ADOConnection1.ConnectionString := Format('Provider=Microsoft.ACE.OLEDB.12.0;Data Source=%s;', + 'Extended Properties="Excel 12.0;HDR=YES";', [FXlFile]); ADOConnection1.Open; ADOTable1.TableName := '[Feuil1$]'; ADOTable1.Open; cds1.Open; except on e: exception do ShowMessage(e.Message); end;
Je n'ai pas trouvé comment corriger ce problème.
Merci de vos conseils pour résoudre cette erreur.
Partager