Как сделать рассылку с линком на этот документ после его создания/изме

Тема в разделе "Lotus - Программирование", создана пользователем Sandro, 26 ноя 2009.

  1. Sandro

    Sandro Гость

    Изиняюсь за наверняка тупейший вопрос , но вот учусь тока, на Querysave формы ставлю
    @MailSend(fld_otvetst;"";"";"Новое мероприятие по ПА "+fld_parent;"";"Cсылка на документ- ";[IncludeDoclink])
    Не отсылает, так понимаю что документ ещё не создан, делаю на Postsave и опять ни... чего (((
     
  2. Omh

    Omh Lotus team
    Lotus team

    Регистрация:
    4 июл 2007
    Сообщения:
    2.210
    Симпатии:
    0
    Я бы делал на скрипте, на PostSave.
    ---
    Посмотрел по хелпу, вроде твоя формула должна отсылать.
    Он опять таки на PostSave, а не QuerySave.

    Но я бы делал скриптом энивей :rolleyes:
     
  3. Klido

    Klido Гость

    можно сделать агентом по новым докам, причем агент даже простыми экшенами это сделает...
    заодно и обучиться работе с агентами :rolleyes:
     
  4. xKlonx

    xKlonx Lotus team
    Lotus team

    Регистрация:
    10 сен 2009
    Сообщения:
    412
    Симпатии:
    0
    Sandro
    Попробуй это на кверисейв,я проверял работает
    Код (Text):
       
    Dim w As New NotesUIWorkspace    
    Dim uidoc As NotesUIDocument       
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim doc As NotesDocument
    Dim rtitem As NotesRichTextItem
    Dim Line1 As String

    line1 = "Нажмите на иконку чтобы открыть документ --> "
    Set db = session.CurrentDatabase
    Set uidoc = w.CurrentDocument  
    Set doc = uidoc.Document
    doc.Form = "Memo"
    doc.SendTo = "сюда введи свой адрес"
    Set rtitem = New NotesRichTextItem( doc, "Body" )
    Call rtitem.AddNewline(1)
    Call rtitem.AppendText( line1 )
    Call rtitem.AppendDocLink( doc,"" )
    doc.Subject = "Новое мероприятие "
    Call doc.Send( False )
    doc.Save True, True
    uidoc.Close
     
  5. Sandro

    Sandro Гость

    Спасиб, понял, буду копать, учиться приходится по боевому ))) Непосредственное рук-во дало задачку потренироваться поучиться, кто то проболтался в бизнесе , что я базу делаю, эти сволочи накатали официальную бумажку что б к 1 декабря была пилотная полноценная версия

    Добавлено: Ещё вопросик, а можно как нить линк вьюшки прикрепить к письму ?
     
  6. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    используйте метод
    AppendDocLink method

    Call notesRichTextItem.AppendDocLink( linkTo, comment$ [, HotSpotText$ ] )
    Parameters
    linkTo
    NotesDatabase, NotesView, or NotesDocument. The database, view, or document to which you want to link.
     
Загрузка...

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