загрузка файла Excel в 1С через Microsoft.ACE.OLEDB.

1. SvetaS2014 29.01.17 17:19 Сейчас в теме
Не работает
СтрокаПодключения="Provider=Microsoft.ACE.OLEDB.16.0;Data Source=G:\11\Кадорр, Б.Арнаутская 26-30.xlsx;Extended Properties=Excel 16.0;";
    // создание соединения
        Connection=Новый ComObject("ADODB.Connection");
    // Подключение
    Попытка
        Connection.Open(СтрокаПодключения);
    Исключение
       // Возврат

        Сообщить("Ошибка подключения к EXCEL");
        Возврат;
    КонецПопытки;
    сообщить("УСПЕШНО EXCEL");   
Показать

кто знает почему?
Excel 2016, 1c 8.3.9.2033
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. SvetaS2014 29.01.17 20:52 Сейчас в теме
Добрый День!
есть
СтрокаПодключения="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="+ ЭлементМассива.ПолноеИмя +";Extended Properties=Excel 12.0;";
      // создание соединения
      Connection=Новый ComObject("ADODB.Connection");
    // Подключение
       Попытка
         Connection.Open(СтрокаПодключения);
       Исключение
       // Возврат
         Сообщить("Ошибка подключения к EXCEL");
         Возврат;
       КонецПопытки;
      сообщить("УСПЕШНО EXCEL");  
  
       // после подключения загружаем содержимое файла
      ТекстЗапроса =
      "SELECT
     |    Лист.Категория1  AS Категория1,
     |    Лист.Категория2  AS Категория2,
     |    Лист.Категория3  AS Категория3,
     |    Лист.Наименование    AS Наименование,
     |    Лист.Кол         AS Кол,
     |    Лист.Цена     as Цена,
     |    Лист.Сумма    AS Сумма
     |FROM
     |    [Лист1$] as Лист
     |Where Лист.Категория1 like  &Категория1
     |";
   
     Выборка = Новый COMОбъект("ADODB.Recordset");

     Попытка
       Выборка.Open(ТекстЗапроса, Connection);
     Исключение
       Сообщить ("Проблемы с выполнением запроса");
       Возврат;
     КонецПопытки;
Показать


Вопрос в запросе есть строка
Where Лист.Категория1 like  &Категория1

но как значение параметра " &Категория1" установить в строке
Выборка.Open(ТекстЗапроса, Connection);

ЛЮДИ ДОБРЫЕ,
ПОМОГИТЕ, ПОЖАЛУЙСТА
3. Fox-trot 158 29.01.17 21:43 Сейчас в теме
имхо проще в самом запросе указать значение параметра
4. SvetaS2014 29.01.17 23:19 Сейчас в теме
не работает
[CODE "SELECT
| Лист.Категория1 AS Категория1,
| Лист.Категория2 AS Категория2,
| Лист.Категория3 AS Категория3,
| Лист.Наименование AS Наименование,
| Лист.Кол AS Кол,
| Лист.Цена as Цена,
| Лист.Сумма AS Сумма
|FROM
| [Лист1$] as Лист
|Where Лист.Категория1 like "+ "Оборудование и материалы" + "
|";][/1C-CODE]

выходит исключение
Исключение
       Сообщить ("Проблемы с выполнением запроса");
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот