опять про аттачи :(

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

Статус темы:
Закрыта.
  1. Luftwaffe

    Luftwaffe Гость

    Есть необходимость вставлять аттачи (вордовские файлы) в документы. что-то вроде тех.библиотеки. типа 1 аттач - один документ. аттачей много 500 шт. хочется (если такое возможно) наваять скриптик, что бы он раскладывал файлы по принципу один файл - один документ. подскажите, плз. в какую сторону копать... :D программать под Лотус начал 1,5 мес.назад, только учусь
     
  2. Sandr

    Sandr Гость

    Тобишь вордовские файлы уже лежат в какой-то папке? Тогда скриптик будет простой... Бегать по каждому файлу в папке, создавать на беэнде документ, аттачить к нему один файлик, сохранять докумен - и так, пока все файлы не пройдет...

    Копать в сторону NotesRichTextItem.EmbedObject
     
  3. Luftwaffe

    Luftwaffe Гость

    а чуть поточнее можно, я ж говорю 1,5 месяца тока... лотусячник уволился, ну на меня и свалили... :D
     
  4. D!m@n

    D!m@n Гость

    Есть папка с файлами, которые надо приаттачить к докам, так?

    Код (Text):
    Dim s As New NotesSession
    Dim thisdb As NotesDatabase
    Dim doc As NotesDocument
    Dim RTItem As NotesRichTextItem

    Set thisdb=s.CurrentDatabase

    fn$=dir$("c:\temp\*.doc") ' предположим, надо аттачить файлы doc из c:\temp
    Do until fn$=""
    Set doc=thisdb.CreateDocument
    doc.Form="<имя формы>" ' поле формы не забудьте задать
    Set RTItem=doc.CreateRichTextItem("<имя RTF-поля>") ' создаем в документе RTF-поле
    Call RTItem.EmbedObject(1454, "", "c:\temp\" & fn$) ' крепим аттачмент
    Call doc.Save(1, 0) ' сохраняем документ

    fn$=dir$()
    Loop
    Код я написал здесь за 5 минут, поэтому, возможно, в нем что-нить не так будет :)
    Но зато покопаетесь, отладите и разберетесь в вопросе.
    Удачи!
     
  5. Luftwaffe

    Luftwaffe Гость

    Угу, спасибо огромное, теперь наверняка разберусь... с примером-то проще будет :)
     
Загрузка...
Похожие Темы - опять про аттачи
  1. vitte
    Ответов:
    10
    Просмотров:
    2.876
  2. Renat11111
    Ответов:
    8
    Просмотров:
    3.702
  3. sanch
    Ответов:
    7
    Просмотров:
    3.923
  4. makaset
    Ответов:
    26
    Просмотров:
    8.635
  5. Баламут
    Ответов:
    19
    Просмотров:
    6.080
Статус темы:
Закрыта.

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