Здравствуйте!

Помогите разобраться, пожалуйста. Есть ком подключение к базе, есть значения, которые прописаны вручную. Нужно вывести значения Сервер и ИмяБазы на форму для редактирования.

Код:
&НаКлиентеНаСервереБезКонтекста
Функция УстановитьCOMСоединение(Сервер,ИмяБазы,Пользователь,Пароль,ЧерезПриложение = Ложь)
	#Если Сервер Тогда
		УстановитьПривилегированныйРежим(Истина);
	#КонецЕсли
	Попытка
		Если Не ЧерезПриложение Тогда
			Соединение = Новый COMОбъект("V83.ComConnector");	
			УдалённаяБаза = Соединение.Connect("Srvr=""" + Сервер + """;Ref=""" + ИмяБазы + """;Usr=""" + Пользователь + """;Pwd=""" + Пароль + """;"); 
			Возврат УдалённаяБаза;
		Иначе
			Соединение = Новый COMОбъект("V83.Application");
			Если Соединение.Connect("Srvr=""" + Сервер + """;Ref=""" + ИмяБазы + """;Usr=""" + Пользователь + """;Pwd=""" + Пароль + """;") Тогда
				Соединение.Visible = Истина;
				Возврат Соединение;
			Иначе
				Возврат Неопределено;
			КонецЕсли;
		КонецЕсли;
	Исключение
		Сообщить(ОписаниеОшибки());
		Сообщить("Ошибка при подключении к удалённой базе.");
		Возврат Неопределено;
	КонецПопытки;
КонецФункции

&НаКлиенте
Функция ОтправитьЗаказНаКлиенте(ИмяПользователя)
	БазаДанных = УстановитьCOMСоединение("192.168.0.100:1555","БАЗА_1С",ИмяПользователя,"123123123",Ложь);
	Если БазаДанных = Неопределено Тогда
		Возврат ОтправитьЗаказНаСервере(ИмяПользователя);
	Иначе
		Попытка
			ВыполнитьОтправкуЗаказа(БазаДанных,ЭтаФорма);
			Возврат Истина;
		Исключение
			Сообщить(ОписаниеОшибки());
			Возврат Ложь;
		КонецПопытки;
	КонецЕсли;
КонецФункции