Научите копировать файлы с локальной машины в папку на сервере УФ

Question

Есть код:

[1C-CODE]Процедура СохранитьФайлНаСервере() Экспорт
	
	Если Параметры.Ключ.Пустая() Тогда

		УИД = Новый УникальныйИдентификатор();
		НоваяСсылка = Справочники.СсылкиНаФайл.ПолучитьСсылку(УИД);
		
		мОбъект = РеквизитФормыВЗначение("Объект");
		мОБъект.УстановитьСсылкуОбъект(НоваяСсылка);
		
		Файл1С = Новый Файл(Объект.Файл);
		УИН    = Строка(УИД);
		ИмяФайлаНаСервере = Константы.ПутьХраненияФайловСканирования.Получить() + "\" + УИН + Файл1С.Расширение;

		Если Найти(Объект.Файл,"\") > 0 Тогда 
			
			ДвоичныеДанные = Новый ДвоичныеДанные(Объект.Файл);
			
			Идентификатор  = Новый УникальныйИдентификатор;
			
			АдресХранилища = ПоместитьВоВременноеХранилище(ДвоичныеДанные, Идентификатор); 
			
			ЗаписатьНаСервер(АдресХранилища, ЛокальныйАдресКаталога, Файл1С.Расширение, ИмяФайлаНаСервере);

		КонецЕсли;
	КонецЕсли;
	
	
КонецПроцедуры

&НаСервере
// Выполняет запись файла из временного хранилища на диск
Процедура ЗаписатьНаСервер(АдресХранилища, ЛокальныйАдресКаталога = "", Расширение, ИмяФайлаНаСервере) Экспорт
	
	// Проверим заполнен ли адрес временного хранилища, откуда будем брать файл
	Если ПустаяСтрока(АдресХранилища) Тогда	
		Возврат;		
	КонецЕсли; 
	
	
	// Проверим существует ли указанный каталог
	КаталогЗаписи = Новый Файл(ЛокальныйАдресКаталога);
	
	Если НЕ КаталогЗаписи.Существует() Тогда	
		Возврат;	
	КонецЕсли; 
	
	ЛокальныйАдресКаталога = ЛокальныйАдресКаталога;
	
	ДвоичныеДанные = ПолучитьИзВременногоХранилища(АдресХранилища); 
		
	ИмяФайла = ИмяФайлаНаСервере;
	
	Попытка	
		ДвоичныеДанные.Записать(ЛокальныйАдресКаталога  + "\" + ИмяФайла + Расширение);	
	Исключение		
	КонецПопытки; 
	
КонецПроцедуры[/1C-CODE]

Объект.Файл - имя файла на локальной машине, 

код не работает - пишет каталог не обнаружен ,что не так?

Accepted Answer

Я так понял Объект.Файл это строка - имя файла?
[CODE]
&НаКлиенте
Процедура ПеренестиФайлНаСервер()
        ДвоичныеДанные = Новый ДвоичныеДанные(Объект.Файл); 
       АдресХранилища = ПоместитьВоВременноеХранилище(ДвоичныеДанные); 
       ЗаписатьФайлНаСервере(АдресХранилища);
КонецПроцедуры

&НаСервере
Процедура ЗаписатьФайлНаСервере(аАдресХранилища)
      ДвоичныеДанные = ПолучитьИзВременногоХранилища(аАдресХранилища);
     
      Попытка
                ДвоичныеДанные.Записать(ЛокальныйАдресКаталога + "\" + ИмяФайла + Расширение);
       Исключение
       КонецПопытки; 
КонецПроцедуры

[/CODE]