Страница 1 из 1
перекачать файл из формата Excel в базу данных
Добавлено: 29 май 2006, 13:02
Рина
помогите пожалуйста с задачей очень, очень надо
Программа должна перекачать выбранный файл из формата Excel в базу данных (желательно InterBase). Структура файла:
Код товара(10 символов), наименование (20 символов), Количество(numeric), Единица измерения (5 символов), Цена (numeric).
2 триггера +1 хранимая процедура (SQL)
Добавлено: 29 май 2006, 18:36
vunder
когда-то писал класс для работы с MsExcel. Могу поделиться. Стучи в ПМ или Аську
Добавлено: 29 май 2006, 18:45
Рина
vunder,
буду невероятно благодарна
только скажи номер аськи
Добавлено: 30 май 2006, 08:59
vunder
Вообще это есть в моем профиле, но 170728075
Добавлено: 31 май 2006, 10:58
UUU
Самый простой вариант - это делать сохранение из экселя в файл с разделителями табулации и качать оттуда.
Добавлено: 31 май 2006, 13:43
vunder
Самый простой вариант - это делать сохранение из экселя в файл с разделителями табулации и качать оттуда.
Не пойдет, т.к. условие задачи стоит так, что данные нужно читать их Excel
Добавлено: 31 май 2006, 20:32
YurikGL
Можно через OLE... можно через ADO...
Добавлено: 31 май 2006, 23:42
vunder
можно через ADO...
а по-подробнее
Добавлено: 01 июн 2006, 21:09
YurikGL
Что-то типа
//выставляем параметры подключения для xls-ки
ADOConnectionForExcel.ConnectionString:=
'Provider=MSDASQL.1; '+
'Persist Security Info=False; '+
'Data Source=Файлы Excel; '+
'Location='+'"'+GetCurrentDir+'\1.xls'+'";'+
'Mode=ReadWrite; '+
'Initial Catalog='+'"'+GetCurrentDir+'\"';
ADOConnectionForExcel.DefaultDatabase:=GetCurrentDir+'\1.xls';
ADOConnectionForExcel.Open;
//создаем книгу
ADOCommandForExcel.CommandText:='create table [Телефоны] '+
' ([Телефон] char (100), '+
' [Имя] char (100), '+
' [Улица] char (100), '+
' [Дом] char (100), '+
' [Корпус] char (100), '+
' [Квартира] char (100)) ';
ADOCommandForExcel.Execute;
Ну и select можно сделать... только тормозит очень сильно
