Передача файла с клиента на сервер

&НаКлиенте
Процедура ОткрытьФайл(Команда)
Если ВсеНастройкиЗаполнены() Тогда
ОчиститьДанныеДляНовойЗагрузки();
СтандартнаяОбработка	=	Ложь;
ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
ДиалогОткрытияФайла.ПолноеИмяФайла	= "";
ДиалогОткрытияФайла.МножественныйВыбор	= Ложь;
ДиалогОткрытияФайла.Заголовок	= НСтр("ru = 'Выберите файл'; uk = 'Виберіть файл'");
ДиалогОткрытияФайла.Фильтр	= "Файлы MS Excel|*.xls;*.xlsx";
ДиалогОткрытияФайла.Показать(Новый ОписаниеОповещения("ПоказатьДиалогВыбораФайлаЗавершение", ЭтотОбъект, Новый Структура("ДиалогОткрытияФайла", ДиалогОткрытияФайла)));
КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура ПоказатьДиалогВыбораФайлаЗавершение(ВыбранныеФайлы, ДополнительныеПараметры) Экспорт
Если (ВыбранныеФайлы <> Неопределено) Тогда
ИмяФайла = ВыбранныеФайлы[0];
Иначе
Возврат;
КонецЕсли;
ДвоичныеДанные=Новый ДвоичныеДанные(ИмяФайла);
АдресВХ = ПоместитьВоВременноеХранилище(ДвоичныеДанные, ЭтаФорма.УникальныйИдентификатор);
ОбрабоатьФайлНаСервере(АдресВХ);
КонецПроцедуры
<code>
&НаСервере
Процедура ОбрабоатьФайлНаСервере(АдресВХ)
ИмяФайла = ПолучитьИмяВременногоФайла("xls");
ДвоичныеДанные = ПолучитьИзВременногоХранилища(АдресВХ);
ДвоичныеДанные.Записать(ИмяФайла);
//Теперь файл с полнім путем "ИмяФайла" скопирован на сервер и можно с ним работть на сервере
КонецПроцедуры

</code>