VPF::Проблемы перехода с xml на xmlx в Delphi

Раша

Дата 30.3.2012, 16:12 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 30.3.2012

Репутация: нет
Всего: нет

Программа написана в Delphi 2007, в качестве источника данных используется книга Excel.
Первоначально данные хранились в файлах *.xls (Excel 97-2003), но из-за ограничения на количество строк приходится перейти на *.xlsx.
После изменения свойства ConnectionString на значения соответствующие новому формату, программа начала вести себя при работе с базой несколько странно. С одной стороны работать не отказывалась, но делает это как-то не полностью. В частности, при использовании команды

Код

SELECT * INTO Temp FROM [Лист1$]

создаётся таблица с нужными столбцами, но пустая. Причём только если работает с файлом xlsx, если xls то всё правильно происходит, как было и ранее.

Офис установлен 2007-мой.
Видимо при смене формата книги требуются ещё какие-то изменения для правильной работы. Надеюсь, что знающие люди подскажут какие. smile

Код процедуры для связи с книгой в файлах, *.xls (Excel 97-2003)

Код


procedure TForm1.ConnectToExcel;
var strConn: widestring;
begin
strConn:='Provider =Microsoft.Jet.OLEDB.4.0; Data Source = ' +Edit1.Text+ '; Extended Properties ="Excel 8.0";';
AdoConnection1.Connected:=False;
AdoConnection1.ConnectionString:=strConn;
try
AdoConnection1.Open;
except
ShowMessage('Не могу соединиться с  книгой Excel, которая расположена по адресу: '+Edit1.Text+' !');
raise;
end;
end;

Изменение в коде процедуры для связи с книгой, для файлов *.xlsx

Код


strConn:='Provider =Microsoft.ACE.OLEDB.12.0; Data Source = ' +Edit1.Text+ '; Extended Properties ="Excel 12.0 Xml; HDR=YES";';

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »