How To Delete Private Views ?

Have you ever had the problem to update private (on first use) views when your
view design changed ?
Well, here is the solution.
You can use the postopen event of the database script to delete the private
views.
The views having reader fields are those you are private to the user and should
be deleted.
Afterwards the database must be closed and reopened.
This trick works on all notes versions.
Isn't that cool ?
Sub Postopen(Source As Notesuidatabase)

Dim session As New notessession
Dim odb As notesdatabase

set odb = session.currentdatabase
array = odb.views

Forall i In array
temp = i.readers
If Isarray(temp) Then
Call i.remove()
End If
End Forall

End Sub

Dig Deeper on Domino Resources

SearchWindowsServer

Search400

  • Favorite iSeries cheat sheets

    Here you'll find a collection of valuable cheat sheets gathered from across the iSeries/Search400.com community. These cheat ...

  • HTML cheat sheet

    This is a really cool cheat sheet if you're looking to learn more about HTML. You'll find just about everything you every wanted ...

  • Carol Woodbury: Security

    Carol Woodbury

SearchDataCenter

SearchContentManagement

Close