In a LS button I am getting an error that the database has not been opened. In this case, that may well be true so how can you force an open? I am trying to open a user’s mail archive and copy the contents back into the mail file. A number of users probably have not opened their archive mail file. I just built in the trap/messages to see if the db is open too. Am I doing something wrong or does the user really have to literally open the file for the open to work? Or is there I can do it through script?
…
Dim dbProfile As NotesDatabase
Dim Profile As NotesDocument
Dim ArchFile As Variant
Set dbProfile = s.CurrentDatabase
Set Profile = dbProfile.GetProfileDocument(“Archive Profile”)
ArchFile = Profile.ArchLastRunDestDBs(0)
Call dbArchive.Open(“”, ArchFile)
…