Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.01.2015, 12:20   #1
TimurUfa
 
Регистрация: 16.01.2015
Сообщений: 5
По умолчанию Экспорт из Excel в MS SQL Server 2008 с помощью Delphi XE7

Здравствуйте, перелопатил уже кучу информации, в том числе и этот форум, но нужного ответа не нашел.
Постановка задачи: нужно из документа Excel (листы "Давление", "Уровень", "Температура") передать информацию из заполненных ячеек в соответствующие таблицы MS SQL Server ("Давление", "Уровень", "Температура").
Как вытащить просто инфу из Excel я уже сообразил:
Код:
  //получаем активный лист
  ActivePage := Ap.ActiveWorkbook.Worksheets[1];
  //определяем количество строк и столбцов таблицы
  Rows:=ActivePage.UsedRange.Rows.Count;
  Cols:=ActivePage.UsedRange.Columns.Count;

  //считываем данные всего диапазона
  DataPage:=ActivePage.UsedRange.Value;

  StringGrid1.RowCount:=Rows;
  StringGrid1.ColCount:=Cols;

  //выводим данные в таблицу
  for i := 0 to Rows-1 do
    for j := 0 to Cols-1 do
        StringGrid1.Cells[j,i]:=DataPage[i+1,j+1];
Ее можно распихивать вручную по столбцам таблицы с помощью INSERT, но я наткнулся на упоминание OPENROWSET и OPENDATASOURCE, попытался их применить наугад:
Код:
SELECT *
    FROM OPENROWSET('Microsoft.ACE.OLEDB.12.0',
    'Excel 12.0;Database=E:\pribor.xls',Давление$)
Но у меня не получилось (Cannot create an instance of OLE DB provider "Microsoft.ACE.OLEDB.12.0" for linked server "(null)"), да и в принципе не представляю, что должно было получиться.

Может кто-нибудь показать на кратком примере как передать информацию на сервер?

Структура таблиц примерно одинакова(Столбцы: ID, Name, Type, Functions, Year, LowLim, HighLim)

Последний раз редактировалось Stilet; 16.01.2015 в 12:22.
TimurUfa вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Delphi + Excel+ MS SQL Server bobik47 БД в Delphi 4 30.08.2013 15:07
Экспорт в Excel из Delphi через SQL запрос betirsolt БД в Delphi 1 19.05.2013 18:11
Экспорт из Excel на SQL Server 2008 Sandman89 SQL, базы данных 7 28.03.2012 11:14
БД SQL Server 2008 и Delphi Asblue БД в Delphi 6 04.12.2010 11:55
MS SQL Server 2008 и Visual Studio 2008 C# (Как работать с БД?) cherw9!40k Базы данных (ADO.NET, LinqToSql, ORM Entity Framework, NHibernate) 2 14.01.2010 20:51