В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
GNA14
GNA14
03.05.2023 11:45 •  Другие предметы

ДоСа. Загрузка из Excel 1с код: &НаСервере
Процедура (Результат, ДополнительныеПараметры) Экспорт
Если Не (Результат = Неопределено) Тогда
СсылкаНаФайл = Результат[0];
КонецЕсли;
Попытка
ТабДок = Новый ТабличныйДокумент;
ТабДок.Прочитать(СсылкаНаФайл);

Для Счетчик = 3 По ТабДок.ВысотаТаблицы Цикл
//заполнение справочника данными из файла
НовыйЭлемент = Справочники.РегиональныеКоды.СоздатьЭлемент();
НовыйЭлемент.Наименование = ТабДок.Область(Счетчик, 2).Текст;
НовыйЭлемент.НаименованиеАнгл = ТабДок.Область(Счетчик, 1).Текст;
НовыйЭлемент.КодПредмет = ТабДок.Область(Счетчик, 3).Текст;
НовыйЭлемент.КодРегиона = ТабДок.Область(Счетчик, 4).Текст;
НовыйЭлемент.OKATO = ТабДок.Область(Счетчик, 5).Текст;
НовыйЭлемент.ISO = ТабДок.Область(Счетчик, 6).Текст;
НовыйЭлемент.Записать();
КонецЦикла;
Сообщить("Данные успешно загружены");
Исключение
Сообщить("Не обнаружен файл");
КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ЗагрузитьИзExcel(Команда)
//();
//выбор файла с рабочего стола
ДиалогВыбораФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
ДиалогВыбораФайла.Фильтр = "Загрузка данных (*.xls; *.xlsx) | *.xls; *.xlsx"; //фильтр файлов по расширению
ДиалогВыбораФайла.МножественныйВыбор = Ложь;
ДиалогВыбораФайла.Показать(Новый ОписаниеОповещения("", ЭтотОбъект, Новый Структура));
КонецПроцедуры

Показать ответ
Ответ:
Gaky
Gaky
09.10.2021 04:53

ответ:

1. когда человек переходит на личности в споре/перпалке и т.д., он автоматически сам доказывает, что проиграл в этом споре.

2. если человек начинает оскорблять родителей, это значит, что он ровно также оскорбляет и своих родителей дома. из этого можно понять, что состояние в его семье весьма неблагоприятное.

3. умный и мудрый человек никогда не перейдёт на оскорбления. сарказм - да, но не оскорбления. человек перешедший на оскорбления доказывает, что у него малый интеллект. если же он оскорбляет, даже не осознавая свою глупость - уменьшает его интеллект в прогрессии.

4. если человек доказал, насколько он глуп - не стоит с ним общаться в принципе. в конечном счёте и вы можете не сдержаться и перейти на личности, оно вам надо?

5. таким людям не надо отвечать, как и разговаривать с ними опреори. таких людей надо искренне жалеть, ведь они не только обделены интеллектом, но и имеют неблагоприятные отношения в семье.

0,0(0 оценок)
Ответ:
liza2005yakovl
liza2005yakovl
22.02.2023 08:43
Данное высказывание указывает на проблему безнравственности человека.данная проблема актуальна и для современного общества. в наше время безнравственность настолько сильно «влилась» в личность человека, что она приводит к совершению преступлений. американский писатель н. готорн в своем высказывании говорит о влиянии денег на жизнь человека, на его характер, на его нравственные качества. с точкой зрения н готорна нельзя не согласиться. становясь богаче, человек «теряет» свои моральные и нравственные качества. получая деньги, человек получает власть. и получив власть над другими, человек лишается всякой разумности
0,0(0 оценок)
Популярные вопросы: Другие предметы
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота