Location : Cleveland, OH
We noticed that the Domino Directory had way more documents than we thought that it should. Also, when creating a new server, the following day, the Directory ballooned in size after a replication. Very strange. A little poking around on developerWorks:Lotus didn't really help, but there was an excellent hit on the Lotus Support page. So, today's Show-n-Tell Thursday will be the result of that search.
You may notice (at least I hope that you do) that your Domino Directory seems to be gathering documents like a magnet. The problem may be wayward Profile Documents. But how do you delete them if you can't see them? Lotus Support has the answer, and it solved our issue - we even had the $Topology Profile issue that was shown in the TechNote. I think that this will work with most Profile documents in the Domino Directory, as long as you can figure out which ones to get a handle on. There are two agents in the TechNote that you can run, one that doesn't do any reporting, and a larger, more complete agent. To whet your appetite, here is the smaller code:
Sub Initialize
Dim session As New NotesSession
Dim db as NotesDatabase
Dim profile as NotesDocument
Dim strServer As String
strServer = Inputbox("Which server do you want to remove the $Topology profile?", "Lotus Notes", "")
Set db = New NotesDatabase(strServer, "names.nsf")
If Not(db.IsOpen) Then
db.Open "", ""
End If
Set profile = db.GetProfileDocument("$Topology")
Call profile.remove(True)
Msgbox "The $Topology profile document was removed!"
End Sub
For the TechNote and the code choices, click on the link below.
Link: NAMES.NSF Grows from 45 MB to 400 MB Every Time the Database is Replicated
Technorati tag: Show-n-Tell Thursday
Powered By : Domino
BlogSphere V1.3.1
Join The WebLog Revolution at BlogSphere.net