1С 8.3 БСП ПолучитьИмяСРасширением
Данные > 1С 8.3 БСП > Файлы (в работе)
Перейти в раздел примеры кода 1С 8.3:
1С 8.3 БСП ПолучитьИмяСРасширением. Возвращает имя файла с расширением. Если расширение пустое, тогда точка не добавляется.
Примера кода от rayastar
Результат = ОбщегоНазначенияКлиентСервер.ПолучитьИмяСРасширением(ИмяБезРасширения, Расширение)
//
Процедура ОткрытьФайлБезРасширенияПередачаФайла(Результат, Контекст) Экспорт
Расширение = Контекст.ДанныеФайла.Расширение;
ИмяФайла = ОбщегоНазначенияКлиентСервер.ПолучитьИмяСРасширением(
Контекст.ДанныеФайла.ПолноеНаименованиеВерсии, Расширение);
ПолучитьФайл(Контекст.АдресФайла, ИмяФайла, Истина);
ВыполнитьОбработкуОповещения(Контекст.Оповещение, Истина);
КонецПроцедуры
//
Процедура ОткрытьФайлБезРасширенияПередачаФайла(Результат, Контекст) Экспорт
Расширение = Контекст.ДанныеФайла.Расширение;
ИмяФайла = ОбщегоНазначенияКлиентСервер.ПолучитьИмяСРасширением(
Контекст.ДанныеФайла.ПолноеНаименованиеВерсии, Расширение);
ПолучитьФайл(Контекст.АдресФайла, ИмяФайла, Истина);
ВыполнитьОбработкуОповещения(Контекст.Оповещение, Истина);
КонецПроцедуры
// Автор библиотеки: ООО "1С-Софт". Все права защищены © 2021
// Типовая конфигурация Библиотека стандартных подсистем (далее - БСП)
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
// Код БСП распространяется по лицензии Attribution 4.0 International (CC BY 4.0):
// ссылка на лицензию: https://creativecommons.org/licenses/by/4.0/legalcode
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник