Форма авторизации пользователя - VBA

Формулировка задачи:

Уважаемые коллеги, сломал себе все. Осталось последняя рабочая копия. Помогите пожалуйста. Нужно, чтобы авторизация была автоматическая через учетную запись Windows, т.е. при открытые БД происходила авторизация пользователя по УЗ и ему не нужно было вводить пароль. Структура нужна именно такая для использовании ролей.

Решение задачи: «Форма авторизации пользователя»

textual
                            Листинг программы 
                        
                            CreateObject("wscript.network").UserName