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