Private views and desktop.dsk
I'm having the same issue. I can get the private views from desktop6.ndk, but for my users running R5 - the same code (using desktop.dsk or desktop5.dsk) returns no views.Dim my6db As New Notesdatabase("","desktop6.ndk")
Dim my5db As New Notesdatabase("","desktop.dsk")
pvview = False
' Check for version
If Cint(version(0)) > 166 Then
If Not(my6db.IsOpen) Then
Call my6db.Open("","")
End If
Forall view In my6db.Views
vname = Lcase(view.Name)
If view.Name <> "" And vname <> "inbox" Then
pvview = True
dohave = workspace.Prompt(PROMPT_OK,"Process Completed","You do have Private views contained within your desktop. These may be in the DCF databases. Please refer to the instructions on the communications site as listed in the memo for information on how to identify and preserve these views.")
Exit Sub
Else
pvview = False
End If
End Forall