Outlook.Application oLk = nieuwe Outlook.Application ();
_NameSpace olNS = oLk.GetNamespace („MAPI“);
_Folders oFolders = olNS.Folders;
MAPIFolder oFolder;
oFolder = oFolders [1];
MAPIFolder oFolderIn = oFolder.Folders [„NetixchangeIn“];
MAPIFolder oFolderOut = oFolder.Folders [„NetixchangeOut“];
MailItem oMailItem;
voor (int. i = oFolderIn.Items.Count; i >= 0; i--)
{
oMailItem = (MailItem) oFolderIn.Items [I];
oMailItem.Move (oFolderOut);
}
|