Подключить = База8.Connect("Srvr ="""+СокрЛП(Srv)+""";Ref="""+СокрЛП(Ref)+""";Usr="""+СокрЛП(Usr)+""";Pwd = """ + СокрЛП(Pass) + """;");
Если Подключить = 0 Тогда
Сообщить("Ошибка подключения!");
КонецЕсли;

СпрСотрудники = Подключить.Справочники.СотрудникиОрганизаций;
Выборка = СпрСотрудники.Выбрать();
Пока Выборка.Следующий() = -1 Цикл
УИД8=Строка(Выборка.Ссылка.УникальныйИдентификатор());
Сообщить(УИД8);
КонецЦикла]