How do i copy the private folder from mailfile A to mailfile B using Lotus Script?

HCL Domino Domino Forum
1

Hi, any one knows the code to copy the private folders from mailfile A to mailfile B using Lotus Script?

Any help will be greatly appreciated…

Cheers

2

Subject: How do i copy the private folder from mailfile A to mailfile B using Lotus Script?

The following LotusScript code sample lists all entries in all folders. Note: views and folders are also VIEWS in the database, tell them by checking .IsFolder

Set db = session.CurrentDatabase

views = db.Views

n_folders = 0

Forall v In views

Set view = v

If view.IsFolder = False Then Goto next_v 'this is not folder, but view

n_folders = n_folders + 1

txt = |Folder #| & n_folders & |: “|& view.Name & |”|

Print txt

Set entries = view.AllEntries

Print entries.Count

If entries.Count = 0 Then Goto next_v 'this folder is empty,goto next folder

'read first entry

For i_entry = 1 To entries.Count

If i_entry = 1 Then

Set entry = entries.GetFirstEntry

Else

Set entry = entries.GetNextEntry( entry )

End If

‘’’ you can handle entry.Document as one of the document in the folder

‘’’ copy or do as you want to do with it…

‘’’ you can use .UniversalID

End If

Next

next_v:

End Forall

Hope it helped.