Как считать информацию о пользователе системы - в ячеку EXCE

Программирование на Visual Basic for Applications
lamden
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 04.04.2004 (Вс) 15:48

Как считать информацию о пользователе системы - в ячеку EXCE

Сообщение lamden » 21.04.2004 (Ср) 1:16

Уважаемые господа профи!
Существует-ли возможность, чтобы, при открытии файла EXCEL'а, в его конкретную ячейку (скажем A1) автоматически помещалась бы информация о пользователе ОС, которая имеется в свойствах системы из: Панель управления-Свойства системы-Общие (имя пользователя, организация, регистрационный номер системы - т.е. те сведения, которые вводится при регистрации ОС в процессе ее установки). Аналогично - для конфигурации компьютера оттуда же и т.п. Такая возможность легко бы решила, в частности, и проблему защиты EXCEL'овского файла от переноса на другой комп...

AndreyV
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 13.02.2004 (Пт) 16:16

Сообщение AndreyV » 21.04.2004 (Ср) 7:49

в модуле книги

Private Sub Workbook_Open()
Cells(1, 1).Value = Application.UserName
Cells(2, 1).Value = Application.OrganizationName
Cells(3, 1).Value = Application.ProductCode
End Sub

lamden
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 04.04.2004 (Вс) 15:48

Сообщение lamden » 21.04.2004 (Ср) 9:59

Уважаемый Андрей!
Большое спасибо, он действительно дает информацию, но теперь вопрос - о каком продукте - номер не совпадает ни с рег. номером системы (WinXP Rus) ни с номером EXCEL (тоже XP)... (Что касается имен юзера и организации, то они у меня для всех продуктов - одинаковые...) Вот и новый предмет исследования готов...
Спасайте, господа профи!..
P.S. Кстати, а о железе подобной информации вытащить нельзя?

AndreyV
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 13.02.2004 (Пт) 16:16

Сообщение AndreyV » 21.04.2004 (Ср) 11:19

ProductCode это GUID экселя, он будет разным на разных версиях офиса 97 2000 XP

lamden
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 04.04.2004 (Вс) 15:48

Сообщение lamden » 21.04.2004 (Ср) 13:50

Простите бестолкового - что это такое - GUID код, он что является принадлежностью продукта или как-то связан с конкретной регистрационной информацией - т.е. если есть две лицензионные копии одного EXCEL'а, установленные на разных компах с разными регистрационными номерами - будут-ли у них разные значения этого кода, или нет? И вообще - где его можно увидеть непосредственно?


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 118

    TopList  
cron