problem e-mail item moving

  • Thread starter Thread starter PeterQ
  • Start date Start date
P

PeterQ

hello Team !

I am trying to move an e-mail item from one folder to another:


omItem and cpyItem are of type MailItem
X and Y are assumed Folder names

CODE:

omItem.FlagStatus = olFlagComplete
omItem.Save

'THIS LINE WORKS WELL:
Set cpyItem = Application.ActiveInspector.CurrentItem
'THIS LINE GIVES ERROR, SAYING I CANNOT MOVE NON-SENT ITEMS
cpyItem.Move m_oMailbox.Folders.Item("X").Folders.Item("Y")

I am looking for a nice solution or work-around to solve this problem.

Please, is there anyone who can help me ?
 
I think the message means what it says. Why are you trying to move an unsent
MailItem?
 
Move is a function that returns a new item, so set the return value to a new
item. Also, close the open item before you try to move it. Save the open
item so you have an EntryID, get that EntryID and use
NameSpace.GetItemFromID to retrieve it again and then do the move. See if
that works.
 
Back
Top