Hallo Forumsmitglieder,
folgende Problematik:
ich muss MailFiles durchlaufen und (fast) alle MailFiles sind offen, dass öffentliche Dokumente (Kalendereinträge) gelesen werden dürfen aber manche MailFiles sind über die ACL so gesteuert, dass es nur für den Eigentümer zugänglich ist (die der Chefs :-)).
Gibt es denn eine Möglichkeit das wenn man das Mailfile öffnet bzw. versucht zu öffnen irgendwie ein Flag zurückkommt mit dem Hinweis
JA, die Datenbank existiert ABER Du darfst Sie nicht öffnen....
Die Befehle
OpenByReplicaID
OpenIfModified
OpenMail
OpenWithFailover
oder
Sub Initialize
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.GetDatabase("snapper", "names2")
If Not db.IsOpen Then
Messagebox "names2.nsf does not exist on snapper",, _
"No names2.nsf"
Else
Messagebox db.Title,, "Title of names2.nsf"
End If
End Sub
gehen immer davon aus, dass man das Recht hat die Db zu öffnen aber das habe ich in diesem Fall definitiv nicht!
Kennt da jemand einen WorkAround, das ich über die Db's bei denen ich kein Zugriffsrecht habe eifach drüberlaufen kann.
Einen Errorhandler habe ich bereits eingebaut und On Error resume next zieht ebenfalls nicht
DANKE und gruss
W.