You open your mail file in a Lotus Notes® client and see that it is listed under "Mail Archive" instead of as a regular mail file.

When a Lotus Notes database mail file shows "Archive" contrary to "Mail," you can run this code to change the ArchiveDatabase field value to 0. Simply close the Lotus Notes database and open again. Then, run the script with the user ID.

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)