Имя: Пароль:
1C
1С v8
Работа с файлами клиент сервер
0 spiller26
 
09.09.16
17:41
Цель перетащить с клиента файл на сервер и обработать.
Выходит сообщение "Использование модальных окон в данном режиме запрещено!"

Где не пойму, помогите.

Вот код
&НаКлиенте
Процедура ЗаполнитьТЗ(Команда)
    ПутьФайлаОстатки      = Объект.ПутьКБазе + Слэш() + "plost.sel";
    ИзвлечТаблицыИзФайлов();
КонецПроцедуры

&НаСервере
Процедура ИзвлечТаблицыИзФайлов()
    ВременныйФайлОстатки     = ПолучитьИмяВременногоФайла();
    ДвоичныеДанные5 = ПолучитьИзВременногоХранилища(Объект.Адрес_plost);
    ДвоичныеДанные5.Записать(ВременныйФайлОстатки);
    Попытка
        ТаблИсхОст            = ЗначениеИзФайла(ВременныйФайлОстатки);
        Объект.Адрес_plost     = ПоместитьВоВременноеХранилище(ТаблИсхОст, Новый УникальныйИдентификатор);                                          
        УдалитьФайлы(ВременныйФайлОстатки);
    Исключение
    КонецПопытки;    
КонецПроцедуры
1 spiller26
 
09.09.16
17:49
По ходу ввыводило сообщение из-за этого

    ПоместитьФайл(Объект.Адрес_plost, ПутьФайлаОстатки,, Ложь, УникальныйИдентификатор);


Поменял на и всё прошло

    Объект.Адрес_plost = ПоместитьВоВременноеХранилище(Новый ДвоичныеДанные(ПутьФайлаОстатки));
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.