Delete personnel on first use view

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

This was first published in May 2001

Disclaimer: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.

Back to top