Послать письмо роли

Тема в разделе "Lotus - Программирование", создана пользователем Medevic, 24 фев 2005.

  1. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Скажите, можно ли отправить письмо роли ?
    Т.е. в поле SendTo написать, например "[Creator]". И оно отошлется всем, кто имеет роль [Creator].
    Мне кажется, я это в хелпе прочел. Хотя не уверен уже.
     
  2. Gogan.exe

    Gogan.exe Гость

    У каждой базы есть свой набор ролей. Почта это отдельная база. Думаю, что так не выйдет. Если же ты посылаешь письмо из самой базы, возможно такая функция и есть.
     
  3. Afrael

    Afrael Гость

    тебе необходимо получить список людей имеющих эту роль и отравить письмо уже вот этим людям .....
    примерно следующим образом.

    Dim workspace As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim acl As NotesACL
    Dim entry As NotesACLEntry
    Dim roleName As String
    Dim foundRole As Variant
    Set uidoc = workspace.CurrentDocument
    Set db = session.CurrentDatabase
    Set acl = db.ACL
    roleName = Inputbox$( "Enter the name of the role" ) ' получаем название роли у пользователя
    ' добавляем квадратные скобки
    roleName = "[" & roleName & "]"
    foundRole = False
    ' проверяем ее существование в АСЛ
    Forall r In acl.Roles
    If ( r = roleName ) Then
    foundRole = True
    Exit Forall
    End If
    End Forall
    If NOT foundRole Then
    Messagebox _
    ( "Роли , " & roleName & " не существует" )
    Else
    Set entry = acl.GetFirstEntry
    While Not ( entry Is Nothing )
    If entry.IsRoleEnabled( roleName ) Then
    Call uidoc.FieldAppendText _
    ( "SendTo ", entry.Name & ";" )
    End If
    Set entry = acl.GetNextEntry( entry )
    Wend
    End If
    Call uidoc.Refresh

    ' в поле SendTo получилинеобходимый список
     
  4. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Afrael, спасибо за пример. Хотя это было не обязательно.
    Похоже, ролям слать нельзя. Т.е. надо вручную проверять наличие роли.
    Интересно то, что если я себе поставлю роль и отошлю письмо этой роли, то мне приходит письмо. А вот с другим человеком так не работает. Вот это и ввело в заблужение.
     
Загрузка...

Поделиться этой страницей