怎么把collectdocument中的文档放到本地folder中

[longmarch820]

是不是应该用putAllInFolder方法啊，怎么用，请高手指教！

[longmarch820]

能说的清楚点么？我原本的zfff.nsf，怎么把里面的文档转成.rtf，放到本地的目录下，谢谢！

[skystar99047]

用putallinfolder不行吗？

[longmarch820]

我怎么都导不过来，还请高手指教，最好能给点代码提示！
sub test
Dim session As New NotesSession
Dim doc As NotesDocument
Dim view As NotesView
Dim coll As Notesviewentrycollection
Dim entry As Notesviewentry
Set db=session.CurrentDatabase
Set view=db.getCurrentView
Set coll = view.allEntries
If coll.count=0 Then
Exit Sub
End If
For i=1 To coll.count
Set entry=coll.getNthEntry(i)
Set doc=entry.document
Call coll.PutAllInFolder("e:\\Notesdb")
Next
---------------------------这样为什么不行？？？
Call coll.PutAllInFolder("e:\\Notesdb")--------？该怎么改？

[chenybin]

不懂你得意思

前面得是Domino得对象

后面是普通得文件系统

你用得那个函数是指系统里面得文件夹，就比如视图那样得东西

就比如说一个Access数据库，你能吧记录直接放到C盘什么什么地方吗？

你得意思是不是输出到文件系统呢？如果是这样你就建立一个文件，然后输出，关于怎么使用文件函数，在http://www.xujiajie.com上面有说得，去找找

[gjd111686]

最好新建数据库副本自动就可以了.