Форум по Delphi программированию - Показать сообщение отдельно - Импорт данных из Excel в базу данных Access

Страдалецъ · #5 28.06.2014, 00:59

Код:

Const
  Excel2007Connection = 'Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Excel 12.0;Data Source=%s';
Var
  AdoConnection: TAdoConnection;
begin
 AdoConnection := TAdoConnection.Create(nil);
 AdoConnection.ConnectionString := Format(Excel2007Connection, ['d:\Мои документы\Delphi программы\Работа с ADO\Импорт с Excel\Мой проект\2.xls']);
 AdoConnection.Open;