The purposes of this tip: 1. Solve the problem: Document in Personnel on first use view will disappear after document modification. It will still be in Notes 5. 2. Update view design without creating a new replica. Solution: Delete private view before closing database. Technique: The private view will have two aliases with the same name and the ubound is 1.
Sub Queryclose(Source As Notesuidatabase, Continue As Variant) Dim ws As New Notesuiworkspace Dim session As New NotesSession Dim db As NotesDatabase Dim view As NotesView Set db = session.CurrentDatabase Set view = db.GetView( "UserReq" ) If (Ubound(view.aliases)>0) Then Call view.Remove End If Set view = db.GetView( "CurrCase" ) If (Ubound(view.aliases)>0) Then Call view.Remove End If Set view = db.GetView( "executive" ) If (Ubound(view.aliases)>0) Then Call view.Remove End If End Sub