Salut
je veux transférer les donnés d'un fichier excel vers une table access
mais apparemment ca ne veut pas marcher
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 procedure TFormMain.Button1Click(Sender: TObject); var dir :string; begin with DM do begin dir:='C:\SOTRAVITORAN'; ADOConnection1.Execute('insert into CG2017 select * from [Excel 8.0; database='+DIR+'].CG2017'); end; end;
TCR.mdb
GC2017.xlsx
Partager