Внешний источник данных загрузка в excel
По теме из базы знаний
- Расчет начисления зарплаты со сложной формулой, по данным из внешнего источника. ЗУП 3.1
- [Расширение] Отключение ограничения на выбор больше 10 дополнительных реквизитов при загрузке номенклатуры из внешнего источника (УНФ 1.6)
- Загрузка данных из внешних источников для Отчета комиссионера и Отчета комитенту. УНФ 1.6
- Пример выгрузки и загрузки файлов Excel, CSV, DBF (обычные и управляемые формы)
- 5 способов загрузки из Excel в 1С
Найденные решения
Остальные ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
(1)
Вот держи.
Старый примерчик, но может и этого хватит
Вот держи.
Старый примерчик, но может и этого хватит
Эксель = Новый COMОбъект("Excel.Application");
Книга = Эксель.Workbooks.Add("");
Лист = Книга.Sheets(1);
// Создадим 100 строк и 100 колонок и заполним их случайными символами
Строк = 100;
Колонок = 100;
ГСЧ = Новый ГенераторСлучайныхЧисел;
Для Сч = 1 по Строк Цикл
Для Сч1 = 1 по Колонок Цикл
Лист.cells(Сч,Сч1).Value = Символ(ГСЧ.СлучайноеЧисло(1,2000));
КонецЦикла;
КонецЦикла;
Эксель.Visible = 1;
Показать
Да понятно, но я же спрашивал в вопросе как именно хочу сделать
все проходит соединение с файлом заполнение поле
и при записи выходит ошибка
по причине:
Ошибка внешней базы данных:
ошибка при выполнении запроса
по причине:
Ошибка ODBC. SQLSTATE: HY000
Номер ошибки: -3035
Описание: [Microsoft][Драйвер ODBC Excel] В операции должен использоваться обновляемый запрос.
все проходит соединение с файлом заполнение поле
и при записи выходит ошибка
по причине:
Ошибка внешней базы данных:
ошибка при выполнении запроса
по причине:
Ошибка ODBC. SQLSTATE: HY000
Номер ошибки: -3035
Описание: [Microsoft][Драйвер ODBC Excel] В операции должен использоваться обновляемый запрос.
ПараметрыСоединения=ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.ПолучитьПараметрыСоединенияСеанса();
ПараметрыСоединения.СтрокаСоединения="Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};"+"DBQ="+СокрЛП(ПроверкаСуществованияФайла.ПолноеИмя)+"; DriverID=1046";
// определяем внешний источник
ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.УстановитьПараметрыСоединенияСеанса(ПараметрыСоединения);
// Попытка
ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.УстановитьСоединение();
СтрокаОбъекта=ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.Таблицы.СтруктураПередачиДанных.СоздатьОбъект();
// СтрокаОбъекта.УстановитьИзменяемыеПоля(МассивПолей);
СтрокаОбъекта.Наименование_населенного_пункта="УЛ";
СтрокаОбъекта.Наименование_Улицы="1";
СтрокаОбъекта.Номер_Дома="1";
СтрокаОбъекта.Номер_Квартиры="2";
СтрокаОбъекта.Номер_Корпуса="4";
СтрокаОбъекта.Начислено=10;
СтрокаОбъекта.Период_С=ТекущаяДата();
СтрокаОбъекта.Период_По=ТекущаяДата();
//СтрокаОбъекта.ПолучитьИзменяемыеПоля();
СтрокаОбъекта.Записать();
ПараметрыСоединения.СтрокаСоединения="Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};"+"DBQ="+СокрЛП(ПроверкаСуществованияФайла.ПолноеИмя)+"; DriverID=1046";
// определяем внешний источник
ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.УстановитьПараметрыСоединенияСеанса(ПараметрыСоединения);
// Попытка
ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.УстановитьСоединение();
СтрокаОбъекта=ВнешниеИсточникиДанных.ОбменСВнешнимиПрограммами.Таблицы.СтруктураПередачиДанных.СоздатьОбъект();
// СтрокаОбъекта.УстановитьИзменяемыеПоля(МассивПолей);
СтрокаОбъекта.Наименование_населенного_пункта="УЛ";
СтрокаОбъекта.Наименование_Улицы="1";
СтрокаОбъекта.Номер_Дома="1";
СтрокаОбъекта.Номер_Квартиры="2";
СтрокаОбъекта.Номер_Корпуса="4";
СтрокаОбъекта.Начислено=10;
СтрокаОбъекта.Период_С=ТекущаяДата();
СтрокаОбъекта.Период_По=ТекущаяДата();
//СтрокаОбъекта.ПолучитьИзменяемыеПоля();
СтрокаОбъекта.Записать();
Вакансии
Аналитик 1С / Бизнес-аналитик
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)