求助视图问题？急

[xqdak]

在R5的C/S下能否实现动态改变视图的内容或动态的创建一个临时的视图？望各路大侠赐教！

[bxzg]

用文件夹，，视图不能，r6能。。

[goflyboy0451]

呵呵，我刚做了用R6做了
Dim db As NotesDatabase
Dim session As New NotesSession
Dim view As NotesView
Set db = session.CurrentDatabase

Set view=db.GetView("vstataresult")
view.AutoUpdate = True
Set tdoc=view.GetfirstDocument
While Not tdoc Is Nothing
Call tdoc.Remove(True)


Set tdoc=view.GetFirstDocument
Wend

Set docnew = New notesdocument(db)
docnew.form="fstatresult"
Call docnew.Save(True,True)