Paul Westlake 20.Jun.08 06:48 AM a Web browser Domino Designer7.0.3 FP1; 7.0.3; 7.0.2 FP3; 7.0.2 FP2; 7.0.2 FP1; 7.0.2; 7.0.1 FP1; 7.0.1; 7.0; 6.5.6; 6.5.5 FP3; 6.5.5 FP2; 6.5.5 FP1; 6.5.5All Platforms
We have hundreds of delete moved mail file AdminP requests to approve.. Didnt want to approve them all individually so we used the AdministrationProcess Object to create the following little agent to go through them all and approve them..
However, the resulting approval document fails to be generated correctly with the error:
Errors: Title: Administration Requests File name: admin4.nsf; Name: ProxyDatabaseSourcePath; Error: Note item not found
Any used this before and fixed this problem ? Thanks in advance
Dim Session As NotesSession
Dim UIWorkspace As NotesUIWorkspace
Dim thisdb As NotesDatabase
Dim UIDoc As notesuidocument
Dim adminp As NotesAdministrationProcess
Dim ApprovalNoteID As String, PendingNoteID As String
Dim dc As NotesDocumentcollection
Dim APRequestsDB As notesdatabase
Dim APRequestsView As NotesView
Dim APRequestDoc As notesdocument
Set Session = New NotesSession
If Not Session.IsOnServer Then
Set UIWorkspace = New NotesUIWorkspace
Set UIDoc = UIWorkspace.CurrentDocument
If Not (UIDoc Is Nothing) Then
Set doc = UIDoc.Document
End If
End If
Set adminp = session.CreateAdministrationProcess( SERVER_CANNONICAL )
Set APRequestsDB = Session.getdatabase( SERVER_CANNONICAL, "Admin4.nsf", False )
If Not APRequestsDB Is Nothing Then
Set APRequestsView = APRequestsDB.GetView( "IndApproval" )
Set APRequestDoc = APRequestsView.GetFirstDocument()
Do While Not APRequestDoc Is Nothing
Return to top
Print this page
