1. Спонсор публикаций Marketplace codeby. Сервис, который так долго ждали. При расчетах используем биткоин. Первый товар уже в продаже: Консультация на тему ИБ от Ondrik8

    Скрыть объявление
  2. Спонсор публикаций Marketplace codeby. Сервис, который так долго ждали. При расчетах используем биткоин. Второй товар маркетплейса: Надёжная обфускация вашей программы от PingVinich

    Скрыть объявление

Помогите вспомнить!

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

  1. sanch

    sanch Well-Known Member

    Репутация:
    0
    Регистрация:
    17 июл 2006
    Сообщения:
    216
    Симпатии:
    0
    Как программно приаттачить что - то к документу?.Спасибо!
     
  2. morpheus

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

    Репутация:
    0
    Регистрация:
    7 авг 2006
    Сообщения:
    3.920
    Симпатии:
    1
    Для: sanch
    Вам в хэлп
    Код (Text):
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim doc As NotesDocument
    Dim rtitem As NotesRichTextItem
    Dim object As NotesEmbeddedObject
    Set db = session.CurrentDatabase
    Set doc = New NotesDocument( db )
    Set rtitem = New NotesRichTextItem( doc, "Body" )
    Set object = rtitem.EmbedObject _
    ( EMBED_ATTACHMENT, "", "c:\jim.sam")
    doc.Form = "Main Topic"
    doc.Subject = "Here's Jim's document, as an attachment"
    Call doc.Save( True, True )
     
  3. sanch

    sanch Well-Known Member

    Репутация:
    0
    Регистрация:
    17 июл 2006
    Сообщения:
    216
    Симпатии:
    0
    О точно! спасибо!
     
Загрузка...
Похожие Темы - Помогите вспомнить
  1. number27
    Ответов:
    0
    Просмотров:
    77
  2. Rina
    Ответов:
    0
    Просмотров:
    91
  3. maksiiimka
    Ответов:
    2
    Просмотров:
    88
  4. Ким
    Ответов:
    23
    Просмотров:
    609
  5. Sr233
    Ответов:
    2
    Просмотров:
    192

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