how to change Domino archive database back to mail database

I’ve experience strange thing with one of our Domino server in one of our site. Strangely for unknown reason, his Domino mail database was changed to archive database. I’m still trying to figure out what the cause and how to fix it.

A solution was found with the help of uncle ‘Google’.
What you need to do is create an agent to change the database back to normal mail database.

The code can be placed in the Initialize event of an agent or in the Click event of a hotspot button.

Here is the script:

Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = s.currentdatabase
Set doc=db.GetProfileDocument("archive database profile")
doc.ArchiveDatabase = "0"
Call Doc.Save(True,True)

As Hotspot-Button in a richtext field:
 @SetProfileField("Archive Database Profile"; "Archivedatabase"; 0);

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s