Изменение значение поля одной БД из другой

Тема в разделе "Lotus - Программирование", создана пользователем Shureg, 22 июл 2008.

  1. Shureg

    Shureg Гость

    Доброго времени суток! Помогите начинающему лотусисту, плз.
    Есть 2 БД на одном сервере. Одна - почтовая, другая - с поручениями. Задача состоит в следующем: надо в форме поручения сделать кнопку, которая запускала бы почтовую форму с заполненным полем SendTo (в качестве значения поля SendTo - адрес составителя поручения). Кнопку создал. Для ссылки на нужную форму использую формулу:
    @Command([Compose]; @MailDbName; "Reply"])
    При нажатии форма открывается, но SentTo содержит ненужные мне адреса. Подскажите, плз, какую-нить формулу или скриптик для моей кнопки, чтоб он задавал значение определенного поля, определенной формы в другой БД.
     
  2. KLif

    KLif Гость

    @:

    Код (Text):
    @Command([Compose]; @MailDbName; "Reply"]);
    @UpdateFormulaContext;
    FIELD FieldName := Value;
    LS:

    Код (Text):
    Dim ws as New NotesUIWorkspace
    Dim uidoc as NotesUIDocument

    Dim session as New NotesSession
    Dim maildb as NotesDatabase
    Dim maildoc as NotesDocument

    Set uidoc = ws.CurrentDocument
    Set maildb = session.GetDatabase(server, path)
    If Not maildb.IsOpen Then
    Call maildb.Open(server, path)
    End if

    Set maildoc = maildb.CreateDocument
    maildoc.Form = "форма"
    Call maildoc.ReplaceItemValue("поле на форме", uidoc.FieldGetText("поле откуда брать значение"))
    Call ws.EditDocument(True, maildoc)
     
  3. Medevic

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

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Может форма Memo всё-таки? Reply - это ответ.
     
  4. KLif

    KLif Гость

    Мне почему то подумалось, что это не стандартная почтовая база лотуса, а какая-то самописная БД, которая хранит уведомления ....
     
  5. Shureg

    Shureg Гость

    Да можна и ее. Прост Reply юзал так как в ней уже было автоматическое заполнение поля "Кому"(правд не тем адресом, который мне нужен)

    Нее, база стандартная, лотусовая

    Попробовал
    Код (Text):
    @Command([Compose]; @MailDbName; "Memo");
    @UpdateFormulaContext;
    FIELD SendTo := "123@mail.ru";
    поле SendTo не заполняется(((
     
  6. Medevic

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

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Код (Text):
    @Command([MailComposeMemo]);
    @UpdateFormulaContext;
    @SetField("EnterSendTo"; "123@mail.ru")
     
  7. Shureg

    Shureg Гость

    Поясните, что нужно указать в качестве path, плз? Путь к чему?
     
  8. Medevic

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

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Путь к почтовой базе.
     
  9. Shureg

    Shureg Гость

    Спасибо огромное!! Заработало)) Подскажи еще плз, а как терь вместо строки "123@mail.ru" подставить значение поля из БД с поручениями (поле ctbAuthor)
     
  10. KLif

    KLif Гость

    Код (Text):
    Address := @GetField("ctbAuthor");
    @Command([MailComposeMemo]);
    @UpdateFormulaContext;
    @SetField("EnterSendTo"; Address)
     
  11. Shureg

    Shureg Гость

    Ура, действует!! Спасибо и респект всем кто помог!!!))))
     
  12. Akupaka

    Akupaka А че я?.. О.о

    Регистрация:
    4 окт 2007
    Сообщения:
    3.373
    Симпатии:
    2
    вот забавный вариант :)

    Код (Text):
    @URLOpen("mailto:usermail@mail.com")
    непременно попытается запустить Вашу почтовую (по-умолчанию) программу и создаст исходящее письмо с указаным адресатом ;)
     
  13. Shureg

    Shureg Гость

    Интересная и очень простая реализация)) Спасибо)
     
  14. morpheus

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

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
Загрузка...

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