БазаОле = Новый COMОбъект("v82.Application");
    Попытка                                                                Состояние("Идет подключение к базе, подождите...");

        Соединение = БазаОле.Connect("Srvr=DB:1641;Ref=""RTL-UT2012"";Usr=""Ша"";Pwd=""809"";");
    Исключение
        Сообщить("Ошибка подключения к базе!", СтатусСообщения.ОченьВажное);
        БазаОле = Неопределено;
    Конецпопытки;

Где-то я сталкивалась, что через COMОбъект не получается, тогда можно какое-то другое заклинание. Какое? И в чем может быть дело, если раньше получалось, а теперь нет?

Если не получается, наверное про какую-то ошибку говорит.

ОписаниеОшибки() что говорит*?

Srvr=DB:1641
Попробуй DB заменить на IP-адрес

Уж не знаю - поможет или нет, однако припоминаю случай, когда задаешь строку соединения целиком - не работает, а когда из кусков собираешь - фурычит. При всем при том строки равны!
Попробуешь строку соединения по частям собрать?