hi christof
having a bit of trouble getting this work. am i supposed to initiate the second folder in the set up of the program?

Local loOutlook   As Outlook.Application
Local loNameSpace As Outlook.NameSpace
Local loInBox     As Object
Local loMSG      As Outlook.MailItem
Local lnUnRead    As Integer
Local loAttach,llAttach

#Define olFolderInBox      6

loOutlook   = Createobject('Outlook.Application') 
loNameSpace = loOutlook.GetNamespace("MAPI")

>Hi Karen,
>
>that should be:
>
>

>=loMSG.Move(loNameSpace.Folders("Mailbox - Principle").Folders("Processed"))   
>