По теме из базы знаний
- Загрузка классификатора банков на сервере терминалов для пользователей с ограниченными правами через AutoIT скрипт и внешнюю обработку.
- Примеры скриптов на OneScript
- Пайплайны Jenkins - программирование и настройка. Загружаемые модули. Цикл "Многопоточный CI для 1С", часть 5
- Загрузка чеков в 1С из ФНС в документы БП, УНФ, ERP, КА и УТ
- Загрузка документов из еФарма для 1С:БП 3.0
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
//выбор каталога
&НаКлиенте
Процедура ПутьКФайлуНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
Режим = РежимДиалогаВыбораФайла.ВыборКаталога;
ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим);
ДиалогОткрытия.Каталог = "";
ДиалогОткрытия.МножественныйВыбор = Ложь;
ДиалогОткрытия.Заголовок = "Выберите каталог";
Если ДиалогОткрытия.Выбрать() Тогда
ПутьКФайлу = ДиалогОткрытия.Каталог;
КонецЕсли;
КонецПроцедуры
Показать
Столкнулся с тем же вопросом, выкрутился так:
&НаКлиенте
Функция НайтиКаталогЗагрузки()
хКаталогДокументы=КаталогДокументов(); // C:\Users\xx\Documents
Если СтрНайти(хКаталогДокументы,"Documents")>0 Тогда
хКаталогЗагрузки=СтрЗаменить(хКаталогДокументы,"Documents","Downloads"); // ---> C:\Users\xx\Downloads
хФайл = Новый Файл(хКаталогЗагрузки);
Если хФайл.Существует() и хФайл.ЭтоКаталог() Тогда
Возврат хКаталогЗагрузки;
Иначе
Возврат "";
КонецЕсли;
Иначе
Возврат "";
КонецЕсли;
КонецФункции
&НаКлиенте
Функция НайтиКаталогЗагрузки()
хКаталогДокументы=КаталогДокументов(); // C:\Users\xx\Documents
Если СтрНайти(хКаталогДокументы,"Documents")>0 Тогда
хКаталогЗагрузки=СтрЗаменить(хКаталогДокументы,"Documents","Downloads"); // ---> C:\Users\xx\Downloads
хФайл = Новый Файл(хКаталогЗагрузки);
Если хФайл.Существует() и хФайл.ЭтоКаталог() Тогда
Возврат хКаталогЗагрузки;
Иначе
Возврат "";
КонецЕсли;
Иначе
Возврат "";
КонецЕсли;
КонецФункции
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот