как читать "out Of Office" пользователю?

  • Автор темы Guest
  • Дата начала
Статус
Закрыто для дальнейших ответов.
G

Guest

#1
Привет всем.
Задача: надо прочитать "Out of Office" по пользователю из внешней проги в R8.
Пытался найти решение, но не смог, пожите кто чем может :( .

Василий
 

morpheus

скриптописец
07.08.2006
3 915
1
#2
ВасилийКаменев
нпрочитать на том же компе где и юзер. ?
"Out of Office" - это локейшен в клиенте или какойнить статус самтайма?
 
G

Guest

#3
Не, это не на компе юзера. Пологаю это из обшей базы, но могу и ошибатся. Суть в том что, если юзер поставил "Out of Office", то биш свалил в отпус или ещё куда, то другая прога типа ERP, могла об этом узнать и не располагать этим пользователем как ресурсом, учётки в обоих (Lotus & ERP) одинаковы.
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#4
Out of Office - это агент. Поэтому, наверное, достаточно проверить, включен ли он.
notesAgent.IsEnabled
 
G

Guest

#5
Ну для себя, как создателя сессии, я могу это проверить, а вот как для пользователя N ?

Out of Office - это агент. Поэтому, наверное, достаточно проверить, включен ли он.
notesAgent.IsEnabled
Ну для себя, как создателя сессии, я могу это проверить, а вот как для пользователя N ?
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#6
Почтовую базу пользователя ты получить можешь. Агента тоже.
 
G

Guest

#9
Да, с почтовой базой нет проблем, но я получаю доступ к своим данным, а мне надо проверить не своего агента, а юзера хххх1.
 

morpheus

скриптописец
07.08.2006
3 915
1
#10
ВасилийКаменев
ну и так и залазте в почтовую базу юзера ХХХ ( узнать файл базы можно в АК в карточке пользователя )
залезть в базу и "просмотреть" свойства агента
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#11
Да, с почтовой базой нет проблем, но я получаю доступ к своим данным, а мне надо проверить не своего агента, а юзера хххх1.
Ну так почтовую базу юзера хххх1 ты получить можешь?
Потом - notesDatabase.GetAgent("OutOfOffice") и проверяешь как я написал выше.
 
G

Guest

#12
Ну так почтовую базу юзера хххх1 ты получить можешь?
Потом - notesDatabase.GetAgent("OutOfOffice") и проверяешь как я написал выше.
залогится юзером ХХХХ я не могу, для этого я должен иметь все пароли, а их дофига, или я что-то не догоняю ? :(
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#13
Логиниться не надо. Достаточно иметь права доступа к базе.
 

morpheus

скриптописец
07.08.2006
3 915
1
#14
ВасилийКаменев
2 возможностти

1. Надо просто быть админом, и/или иметь доступ к базам
2. Запускать агент на сервере
 
G

Guest

#18
Как связаны другая прога типа ERP и R8 между собой?
пока общего и них логины из Microsoft AD

извините за назойливость, но как я не кручу код , ни как не получается открыть др. юзера бд :(

session.Initialize ("password")
Set dbDir = session.GetDbDirectory("")
Dim maildb As NotesDatabase
Dim oof As NotesAgent
Set maildb = dbDir.OpenDatabase ' определённо эта строка дожна быть другой, но....?
Set oof = maildb.GetAgent("OutOfOffice")
 
S

Sandr

#19
ВасилийКаменев
Ну, путь вы получаете из диррктори, а что потом сложного в открытии базы по путю?
 
G

Guest

#20
ВасилийКаменев
Ну, путь вы получаете из диррктори, а что потом сложного в открытии базы по путю?
да база открывается, но она моя, и я не могу перейти на базу др. юзера :( , либо админ мне права не тее прописал ?!
 
Статус
Закрыто для дальнейших ответов.