需要帮助将Notes数据库文件中的嵌入式Word文档导出到本地Windows文件夹

Question

我们有一个Lotus Notes 7.0环境，在服务器上有一个文档库（.nsf）数据库文件。

我有一个本地副本（如果有帮助），并希望将所有嵌入的word文档导出到本地Windows文件夹或桌面。

这可能吗 ？

有一个名为“Detachit”的软件可以在线购买但是非常昂贵（1250美元），每个许可证，因此如果有人可以提供帮助，我们将非常感激。

Answer 1

如果你知道如何编写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：How do I get all the attachments from a .nsf(lotus notes) file using java