Гуглила, читала, пробовала применять
остановилась на этом
и ВСЕ РАВНО НЕ ПОЛУЧИЛОСЬ!
Помогите пожалуйста
Лучше всего - рабочей обработкой, читающей файл Эксель на сервере 1С на SQL
Управляемые формы. MS SQL. И база и эксель физически лежат на одной машине. Но эксель упорно не открывается, мол 1с не видит его. COMОбъект на клиенте вроде как нельзя создавать. Как боритесь с этой ситуевиной?
остановилась на этом
&НаКлиенте
Процедура Загрузить(Команда)
Файл = Новый ДвоичныеДанные(ОБъект.ИмяФайла);
Адрес = ПоместитьВоВременноеХранилище(Файл, ЭтаФорма.УникальныйИдентификатор);
//ОбработатьНаСервере(Адрес);
ЗагрузитьНаСервере(Адрес);
КонецПроцедуры
&НаСервере
Процедура ЗагрузитьНаСервере (ФайлВХранилище)
Попытка
ex = ПолучитьCOMобъект("","Excel.Application");
Исключение
Сообщить("Excel Application не создан!!");
Возврат;
КонецПопытки;
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ФайлВХранилище);
тПуть = КаталогВременныхФайлов() + "123.xlsx"; //для примера...
ДвоичныеДанные.Записать(тПуть);
Попытка
ex.workbooks.open.Open(тПуть,,Истина,,,,,,,,Ложь);
Исключение
Сообщить("Файл перемещен или удален!");
Возврат;
КонецПопытки; Показатьи ВСЕ РАВНО НЕ ПОЛУЧИЛОСЬ!
Помогите пожалуйста
Лучше всего - рабочей обработкой, читающей файл Эксель на сервере 1С на SQL
Управляемые формы. MS SQL. И база и эксель физически лежат на одной машине. Но эксель упорно не открывается, мол 1с не видит его. COMОбъект на клиенте вроде как нельзя создавать. Как боритесь с этой ситуевиной?
По теме из базы знаний
- Шаблоны загрузки Excel файлов из каталога в 1С 8 (обычные и управляемые формы)
- Управляемые формы: чтение макетов с объединенными ячейками (в частности, и из экселей)
- Загрузка из Excel в управляемом приложении
- Пример переноса справочников, документов и движений через Эксель и "Конвертацию данных 2" из оптовой учетной системы 1С 7.7 Комплексной 4.2 и розничной учетной системы Рарус Торговый комплекс -> в 1С 8.3 ЕРП 2.4 (расширение и дополнительные реквизиты)
- Быстрый старт в тестировании на платформе 1С (Vanessa-ADD)
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Так а проблема в чём? Вы открыли книгу Excel, а прочитать данные с листов в этой книге? На этом этапе Вы будто бы почистили картошку и удивляетесь, почему она ещё не пожарена. Очевидно, потому что её нужно ещё пожарить. :)
(1) Вот кусочек кода, где я забираю данные из одного листа Excel и кидаю на другой.
- Вот тут есть куча приёмов для работы с Excel.
// Открываем временный файл КонтрольИсключений, копируем в нём лист с данными и вставляем эти данные в лист книги Excel приемника
КнигаКонтрольИсключений = ОткрытьExcelДокумент.WorkBooks.Open(ВременныйКаталог + "КонтрольИсключений.xlsx");
ЛистКонтрольИсключений = КнигаКонтрольИсключений.WorkSheets(1).Cells.Select();
НовыйЛистКонтрольИсключений = НоваяКнига.WorkSheets.Add();
НовыйЛистКонтрольИсключений.Name = "Контроль исключений";
ОткрытьExcelДокумент.Selection.Copy();
НовыйЛистКонтрольИсключений.Paste(); Показать- Вот тут есть куча приёмов для работы с Excel.
(9) на форме путь к файлу, серверная 1с говорит нет файла по этому адресу.
Прикрепленные файлы:
ЗагрузкаЛидов (2).epf
(23) Файл = Новый ДвоичныеДанные(ОБъект.ИмяФайла);
Адрес = ПоместитьВоВременноеХранилище(Файл, ЭтаФорма.УникальныйИдентификатор);
//ОбработатьНаСервере(Адрес);
Сообщить(Файл.Существует());
Это на Клиенте
Метод объекта не обнаружен (Существует)
{ВнешняяОбработка.ЗагрузкаЛидов.Форма.Форма.Форма(17)}: Сообщить(Файл.Существует());
Адрес = ПоместитьВоВременноеХранилище(Файл, ЭтаФорма.УникальныйИдентификатор);
//ОбработатьНаСервере(Адрес);
Сообщить(Файл.Существует());
Это на Клиенте
Метод объекта не обнаружен (Существует)
{ВнешняяОбработка.ЗагрузкаЛидов.Форма.Форма.Форма(17)}: Сообщить(Файл.Существует());
(30)
(23)
(23)
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ФайлВХранилище);
тПуть = КаталогВременныхФайлов() + "123.xlsx"; //для примера...
ДвоичныеДанные.Записать(тПуть);
Сообщить(тПуть.Существует());
НаСервере
{ВнешняяОбработка.ЗагрузкаЛидов.Форма.Форма.Форма(35)}: Значение не является значением объектного типа (Существует)
Сообщить(тПуть.Существует()); Показать
(24) Разовая работа.
Если вы не умеете переносить файл на сервер (нигде же примеров посмотреть нельзя, действительно), создайте на форме обработки табличный документ скопируйте в него данные из екселя вручную, обработайте этот табличный документ.
Дел на 5 минут.
Если вы не умеете переносить файл на сервер (нигде же примеров посмотреть нельзя, действительно), создайте на форме обработки табличный документ скопируйте в него данные из екселя вручную, обработайте этот табличный документ.
Дел на 5 минут.
(24) Если сервер чужой, есть явные проблемы с правами или еще чем-то, и эти проблемы на СЕРВЕРЕ не решаются, то единственное решение - сделать это на клиенте и передать на сервер данные для формирования справочника.
или вы хотите чтобы здесь нашли ответственного админа за сервер и сказали на что нужно дать права? Вам подсказывают реальные способы решения а вы не слышите
или вы хотите чтобы здесь нашли ответственного админа за сервер и сказали на что нужно дать права? Вам подсказывают реальные способы решения а вы не слышите
(32)
&НаКлиенте
Процедура Загрузить(Команда)
Файл = Новый Файл(ОБъект.ИмяФайла);
Если Не Файл.Существует() Тогда
Сообщить("ФАЙЛ НЕ СУЩЕСТВУЕТ");
Возврат;
КонецЕсли;
Попытка
ex = ПолучитьCOMобъект("","Excel.Application");
Исключение
Сообщить("Excel Application не создан!!");
Возврат;
КонецПопытки;
Попытка
ex.workbooks.open.Open(Файл.ПолноеИмя,,Истина,,,,,,,,Ложь);
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
КонецПроцедуры Показать
(37) что я буду делать на клиенет с файлом, предеавать на сервер строки?
вот так тоже не открыл
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ФайлВХранилище);
тПуть = КаталогВременныхФайлов() + "123.xlsx"; //для примера...
ДвоичныеДанные.Записать(тПуть);
КаталогНаДиске = Новый Файл(тПуть);
Сообщить(КаталогНаДиске.Существует());
Сообщить( тПуть);
Попытка
ex.workbooks.open.Open(КаталогНаДиске,,Истина,,,,,,,,Ложь);
Исключение
Сообщить("Файл перемещен или удален!");
Возврат;
КонецПопытки;
вот так тоже не открыл
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ФайлВХранилище);
тПуть = КаталогВременныхФайлов() + "123.xlsx"; //для примера...
ДвоичныеДанные.Записать(тПуть);
КаталогНаДиске = Новый Файл(тПуть);
Сообщить(КаталогНаДиске.Существует());
Сообщить( тПуть);
Попытка
ex.workbooks.open.Open(КаталогНаДиске,,Истина,,,,,,,,Ложь);
Исключение
Сообщить("Файл перемещен или удален!");
Возврат;
КонецПопытки;
(33)
НаСервере, сообщить ответил ДА!
Но тут же - Файл перемещен или удален написал,
соответсвенно, ничего не загрузил
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ФайлВХранилище);
тПуть = КаталогВременныхФайлов() + "123.xlsx"; //для примера...
ДвоичныеДанные.Записать(тПуть);
КаталогНаДиске = Новый Файл(тПуть);
Сообщить(КаталогНаДиске.Существует());
Попытка
ex.workbooks.open.Open(тПуть,,Истина,,,,,,,,Ложь);
Исключение
Сообщить("Файл перемещен или удален!");
Возврат;
КонецПопытки; ПоказатьНаСервере, сообщить ответил ДА!
Но тут же - Файл перемещен или удален написал,
соответсвенно, ничего не загрузил
Кстати, а точно так нужно открывать файл экселя через ком объект? точно уже не помню, но мне кажется ошибка там не изза наличия или отсутствия файла.
Вот тут например совсем другой способ открытия листа экселя. Возможно ошибка у вас в исключении изза ошибки в ком объекте
Вот тут например совсем другой способ открытия листа экселя. Возможно ошибка у вас в исключении изза ошибки в ком объекте
Попытка
Excel = Новый COMОбъект("Excel.Application");
Excel.WorkBooks.Open(ИмяФайла);
Состояние("Обработка файла Microsoft Excel...");
Исключение
Сообщить("Ошибка при открытии файла с помощью Excel! Загрузка не будет произведена!");
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
Попытка
//Открываем необходимый лист
Excel.Sheets(1).Select();// лист 1, по умолчанию
Исключение
//Закрываем Excel Показать
На клиенте прочиать файл в табличныйдокумент. далее табличный перефразировать в таблицу значений или таблица на форме. На сервере использовать данные из таблицы для создания файла.
П.с. что у вас выдает данные строки: ТабДок = Новый ТабличныйДокумент; ТабДок.Прочитать(ПутьКФайлу, СпособЧтения); Что в табдок или какая ошибка?
(45)
П.с. что у вас выдает данные строки: ТабДок = Новый ТабличныйДокумент; ТабДок.Прочитать(ПутьКФайлу, СпособЧтения); Что в табдок или какая ошибка?
(45)
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот