Нужна помощь Экспорт встроенных документов Word из файла базы данных Notes в локальную папку Windows - PullRequest
Новая
       19

Нужна помощь Экспорт встроенных документов Word из файла базы данных Notes в локальную папку Windows

0 голосов
/ 15 ноября 2011

У нас есть среда lotus notes 7.0 с файлом базы данных библиотеки документов (.nsf) на сервере.

У меня есть локальная копия (если это помогает), и я хотел бы экспортировать все встроенные текстовые документы в локальную папку Windows или на рабочий стол.

Возможно ли это?

Существует программное обеспечение с именем "Detachit", которое можно приобрести через Интернет, но оно очень дорогое (1250 долларов США) за лицензию и, следовательно, будет очень признательно, если кто-то сможет помочь.

1 Ответ

1 голос
/ 15 ноября 2011

Если вы знаете, как программировать lotusscript, это на самом деле очень просто.Из справки: 

Dim doc As NotesDocument
Dim rtitem As Variant
Dim fileCount As Integer
Const MAX = 100000
fileCount = 0    
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
  Forall o In rtitem.EmbeddedObjects
    If ( o.Type = EMBED_ATTACHMENT ) _
    And ( o.FileSize > MAX ) Then
      fileCount = fileCount + 1
      Call o.ExtractFile _
      ( "c:\reports\newfile" & Cstr(fileCount) )
      Call o.Remove
      Call doc.Save( True, True )
    End If
  End Forall
End If

Или вы можете использовать Java: Как получить все вложения из файла .nsf (lotus notes), используя java

...