view design changed ?
Well, here is the solution.
You can use the postopen event of the database script to delete the private
The views having reader fields are those you are private to the user and should
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
This was first published in November 2000