ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / По имени пользователся узнать полное имя в Outlook
14 сообщений из 14, страница 1 из 1
По имени пользователся узнать полное имя в Outlook
    #33763234
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
Всем привет!
Такая вот задачка...
как по имени пользователся получить полное имя из Outlook
Например: имя пользователся ipetrov6, а его полное имя в адресной книге Outlook - Иван Петров. Как это программно сделать/вычислить
Спасибо.
...
Рейтинг: 0 / 0
31.05.2006, 13:23:38
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33771001
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
Ухтыыыыы...
Нихтоъ не знаетъ? :)
...
Рейтинг: 0 / 0
04.06.2006, 14:07:28
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33800714
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ivan33
Участник
так в том-то и дело, шо имя можно узнать, однако "Иван Петров" именно получение этого имени мне думается зависит от Active Directory. кажись. Потому шо, ваш "ник" соответствует юзернэйм, а полное имя можно выцепить только из той записи, когда сисадмин создавал вашу запись для почтового аккаунта. Если он недобросовестно заполнил аккаунт, то вы его не получите имя. Я только видел, шо в актив директори сохраняется вся информация о пользователе (телефоны, имя, отчетство и т. д.) и эту штуку могут юзать все приложения мс офис.
...
Рейтинг: 0 / 0
19.06.2006, 17:40:47
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33800751
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ivan33
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Username()


MsgBox "Your registered user name is " & Application.Username & Chr( 13 ) & _
            "company name " & Application.OrganizationName

End Sub
...
Рейтинг: 0 / 0
19.06.2006, 17:53:28
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33802963
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
Ivan33
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Username()


MsgBox "Your registered user name is " & Application.Username & Chr( 13 ) & _
            "company name " & Application.OrganizationName

End Sub

Application.Username - даёт то самое имя пользователя, а не полное имя...
Application.OrganizationName - это меня не интересует-с...
:)



Ivan33так в том-то и дело, шо имя можно узнать, однако "Иван Петров" именно получение этого имени мне думается зависит от Active Directory. кажись. Потому шо, ваш "ник" соответствует юзернэйм, а полное имя можно выцепить только из той записи, когда сисадмин создавал вашу запись для почтового аккаунта. Если он недобросовестно заполнил аккаунт, то вы его не получите имя. Я только видел, шо в актив директори сохраняется вся информация о пользователе (телефоны, имя, отчетство и т. д.) и эту штуку могут юзать все приложения мс офис.
Так если я набираю имя пользователя в Outlook, затем нажимаю Ctrl+K (проверить имя), то Outlook преобразует имя пользователя в полное имя. Так что, думаю нет проблем с Active Directory.
И макрос не записать, как Outlook преобразует... :(
...
Рейтинг: 0 / 0
20.06.2006, 15:23:14
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33803302
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ivan33
Участник
но в любом случае, если правильно с соблюдением всех правил заполнена регистрация продукта при установке, то шанс получить имя пользователя есть. если неправильно было все заполнено, то откедова тогда получить это имя пользователя?
...
Рейтинг: 0 / 0
20.06.2006, 16:45:50
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33803658
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
Ivan33но в любом случае, если правильно с соблюдением всех правил заполнена регистрация продукта при установке, то шанс получить имя пользователя есть. если неправильно было все заполнено, то откедова тогда получить это имя пользователя?
Из Outlook. Обратиться в адресную книгу...
...
Рейтинг: 0 / 0
20.06.2006, 18:22:07
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33803684
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ivan33
Участник
ааа, Семен Семеныч. ТАк чего же вы говорите "имя пользователя"? Только путаете.
...
Рейтинг: 0 / 0
20.06.2006, 18:28:55
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33804552
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
arsenyТак если я набираю имя пользователя в Outlook, затем нажимаю Ctrl+K (проверить имя), то Outlook преобразует имя пользователя в полное имя.
Это то самое действие, которое мне надо сделать програмно :)
...
Рейтинг: 0 / 0
21.06.2006, 10:33:58
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33805579
jdedevel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jdedevel
Гость
Если у тебя юзера беруться из домена,
то чтобы его получить надо обратится с контроллеру домена.

Вот код для Excel
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Set domain = GetObject("WinNT://контрллер")
domain.Filter = Array("User")
i =  2 
For Each user In domain
Cells(i,  1 ) = user.Name
Cells(i,  2 ) = user.FullName
i = i +  1 
Next

Контроллер - имя контроллер домена. Именно тут и хранится
список юзеров.

Name - логин юзера
FullName - ФИО (ну или как он записан)

Получив user не обязательно его выводить на лист Excel :)
...
Рейтинг: 0 / 0
21.06.2006, 14:08:18
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33805849
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
jdedevelЕсли у тебя юзера беруться из домена,
то чтобы его получить надо обратится с контроллеру домена.

Вот код для Excel
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Set domain = GetObject("WinNT://контрллер")
domain.Filter = Array("User")
i =  2 
For Each user In domain
Cells(i,  1 ) = user.Name
Cells(i,  2 ) = user.FullName
i = i +  1 
Next

Контроллер - имя контроллер домена. Именно тут и хранится
список юзеров.

Name - логин юзера
FullName - ФИО (ну или как он записан)

Получив user не обязательно его выводить на лист Excel :)
Опа! Америка Европа...
jdedevel - думаю, совсем близко до цели
список пользователей вылетел, но АБСОЛЮТНО весь. Где-то 10 тыс. человек.
Фильтр не срабатывает? Почему? Есть идея?
Сенькс!
...
Рейтинг: 0 / 0
21.06.2006, 14:57:23
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33806575
jdedevel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jdedevel
Гость
arseny jdedevelЕсли у тебя юзера беруться из домена,
то чтобы его получить надо обратится с контроллеру домена.

Вот код для Excel
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Set domain = GetObject("WinNT://контрллер")
domain.Filter = Array("User")
i =  2 
For Each user In domain
Cells(i,  1 ) = user.Name
Cells(i,  2 ) = user.FullName
i = i +  1 
Next

Контроллер - имя контроллер домена. Именно тут и хранится
список юзеров.

Name - логин юзера
FullName - ФИО (ну или как он записан)

Получив user не обязательно его выводить на лист Excel :)
Опа! Америка Европа...
jdedevel - думаю, совсем близко до цели
список пользователей вылетел, но АБСОЛЮТНО весь. Где-то 10 тыс. человек.
Фильтр не срабатывает? Почему? Есть идея?
Сенькс!
Ну так тут и нет никакого фильтра!
domain.Filter = Array("User") - указывает на то, что мы берем
с контроллера имена юзеров (а не группы, например).
Из этого сделай функцию
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Function GetFIO(UN As String) As String
Set domain = GetObject("WinNT://контроллер")
domain.Filter = Array("User")
For Each user In domain
If UCase(user.Name) = UCase(UN) Then
GetFIO = user.FullName
Exit Function
End If
Next
End Function
UCase - чтобы с регистром не морочаться.
и вызывай ее GetFIO("login1").
Можешь модифицировать ф-цию, чтобы она
искала юзера по нескольким символам.
Можно при старте загрузить всех юзеров в список с возможностью обновления этого списка.
Тогда не надо будет каждый раз к контроллеру домена стучаться.
Но может быть ситуация, когда юзера завели, а в списке его нет (пока
не обновишь). И искать надо будет юзера уже в этом списке.

Выбирать способ тебе.
...
Рейтинг: 0 / 0
21.06.2006, 17:47:48
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33807749
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
arseny
Участник
Спасибо jdedevel !
В общему, буду использовать как есть. Считываение всех юзеров берёт 6-7 секунд. Сделаю кэширование каждого юзера, который заходит в файл и буду сначала юзать кэш, а потом уже в книгу лезть.
...
Рейтинг: 0 / 0
22.06.2006, 10:34:36
| Ответить | Цитировать | Написать  
По имени пользователся узнать полное имя в Outlook
    #33808636
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ivan33
Участник
кукисы в интерне-эксплорере тоже выполняют такую же роль, если взять аналогию.
...
Рейтинг: 0 / 0
22.06.2006, 13:46:18
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / По имени пользователся узнать полное имя в Outlook
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&gotonew=1&tid=2184726]:
 0ms
get settings:
 7ms
get forum list:
 13ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 38ms
get topic data:
 9ms
get first new msg:
 5ms
get forum data:
 2ms
get page messages:
 50ms
get tp. blocked users:
 1ms
others: 201ms
total:  330ms
созд. / загр.: 330ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]