Skip to main content

During application development, you may find that you are dealing with a database that contains numerous Profile Documents. Individual Profile Documents can be modified or deleted using the GetProfileDocument method, but this is a time-consuming process if there are thousands of Profile Documents. How can multiple Profile Documents be processed or deleted simultaneously?

For example, the following returns all profiles named "Profile-Name" from the current database:
    Dim s as New NotesSession
    Dim db as NotesDatabase
    Dim col as NotesDocumentCollection
    Set db = s.currentdatabase
    Set col = db.GetProfileDocCollection("Profile-Name")
    Call col.RemoveAll(True)

In Notes/Domino 8.0 and later, the following agent script example would return and delete all profiles within the current database:

    Sub Initialize
    Dim s As New NotesSession
    Dim db As NotesDatabase
    Dim col As NotesDocumentCollection
    Set db = s.currentdatabase
    Set col = db.GetProfileDocCollection
    Call col.RemoveAll(True)
    Messagebox"All Profiles Document Deleted"
    End Sub
Note: In the Agent properties > Runtime section, the Target should specify None.

Comments

Post a Comment

Popular posts from this blog

Lotusscript to establish ODBC connection:

The script, when executed from a button, will create a new record in a specified ODBC data source, attempt to save the new record and display a message indicating whether the operation was completed successfully. If the operation is not completed sucessfully, it is likely that either your data source is read-only or your ODBC driver does not permit updates to the data source. Important: Complete each of the four steps below before running the script. 1. Create a new agent and add the following UseLSX command to the Options event: UseLSX "*LSXODBC" 2. Add the following script to the Initialize event of the agent. NOTE: Do not add the 'Sub' and 'End Sub' lines. Dim ui As New NotesUIWorkspace     Dim uidoc As NotesUIDocument     Dim doc As NotesDocument     Dim connection As ODBCConnection     Dim query As ODBCQuery     Dim result As ODBCResultSet         Set uidoc=ui.CurrentDocument ...
1 comment
Read more

Commom Interview Questions for a Domino Developer

1. To find if a particular item exists in lost of items what commands are there in formula lang and lotusscript? Ans : Formula : @Contains; @IsMember Script : Instring 2. Difference between @UserRoles and @UserNamesList Ans : @UserRoles - Roles in the ACL which the user has @UserNamesList - Groups in the ACL to which the user belongs to 3. If there are multiple commands to be executed on a click of a button in formula lang, how will you do it And : @Do(@Command1;@Command2.....) 4. What is the difference between @DBColumn adn @DBLookup. Where will each of them be used? 5. File upload using Formula language? And : The field to which the file is uploaded should be a Rich Text Field. Command is @@Do(@PostedCommand([EditGotoField]; "Field Name");@PostedCommand([EditInsertFileAttachment])) 6. On click on a button in the left frame, open a view in the right frame. Ans : @SetTargetFrame("FRAMERIGHT"); @Command([OpenView];...
Post a Comment
Read more