Общая информация
Есть такая замечательная утилита BgInfo от TechNet (http://technet.microsoft.com/en-us/sysinternals/bb897557.aspx), которая позволяет поверх обоев рабочего стола вывести информацию о ПК, сеансе пользователя и т.д.
Нечто подобное, в гораздо упрощенном варианте, позволяет сделать этот 1С++ класс. Выводит фоном в главном окне 1С параметры сессии, которые состоят из:
- Названия 1С. Выводить ЗаголовокСистемы().
- Имя пользователя в 1С.
- Системное имя пользователя.
- Имя сервера, если 1С запущена в терминальной сессии.
- IP адрес сервера, если 1С запущена в терминальной сессии.
- Имя локального компьютера. Даже если 1С запущена в терминальной сессии будет получена имя клиента RDP.
- IP адрес локального компьютера. По полученному имени пытаемя определить IP адрес клиента через парсинг вывода ping-а.
Пример использования
Для работы необходимо:
- Подключить класс.
- Чтобы вывести информацию в главное окно 1С:
oBGInfo = СоздатьОбъект("BgInfo"); oBGInfo.Выполнить("Ваши учетные:"); - Не забудьте зарегистрировать ActiveX компоненту.
Недостатки
- Надо понимать, что данные клиентской машины, в случае подключения к терминальному серверу не всегда можно получить, т.к. это зависит от типов клиентов.
- IP адрес клиентской машины получается путем простого парсинга ответа на ping. Его тоже не всегда можно получить.