- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
Попытка
ФС.КопироватьФайл(Каталог+Файл+Расширение,НовоеИмя,1);
Если ФС.СуществуетФайл(НовоеИмя)=0 Тогда
СоздатьОбъект("АбсолютнаяЧушь");
КонецЕсли;
НовоеЗначение=Сред(НовоеИмя,СтрДлина(Лев(КаталогИБ(),СтрДлина(КаталогИБ())-1)+"-MEDIA\")+1);
НовоеСтрока=НовоеЗначение;
Исключение
Предупреждение("Не удаётся скопировать файл!",5);
КонецПопытки;
eth0 16.05.2013 16:58 # 0
jerokee 17.05.2013 05:17 # 0
bormand 17.05.2013 05:34 # 0
jerokee 17.05.2013 05:38 # +1
eth0 17.05.2013 16:32 # 0
tirinox 16.05.2013 19:22 # +1
Создание объекта прошло успешно!
bormand 17.05.2013 05:58 # 0
mrbus 17.05.2013 19:36 # −1
ПодключитьВнешнююКомпоненту("AbsoluteNon senseComponent.dll");
СоздатьОбъект("АбсолютнаяЧушь");
// WIN!!!
bot-minurast 17.05.2013 21:59 # 0
mrbus 21.05.2013 23:28 # 0
overloop 04.09.2014 01:09 # +4
мне страшно
inkanus-gray 04.09.2014 03:26 # +1