Archieve email

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi

We use public folders today where we have a folder for each customer. I
would like to create an easy way for our users to move a selected e-mail to
the public folders just by activating a button in the mail and typing the
customer number!
If a public folder exists with the same customer number then move the mail
to that folder, if the folder doesn't exist then create the folder and then
move the mail.

Any one?
 
Have you started coding this yet? Do you have any particular questions
regarding the architecture or implementation of this solution? Or are you
just looking for someone to do this for you?
 
I have made a bit of the code. I am having trouble using the public folders,
is it possible to make some code that shows me all the folders?
 
Do you want to display a Public Folder in the Outlook folder list so that it
is active and displaying the folder contents? Or do you just need a
MAPIFolder object for a specific folder?

The code below shows how to retrieve the base collection for the Public
Folders - you can then "walk" the Folders collections to locate a specific
node in the hierarchy.

Sub ParseInfoStores()
Dim objNS As Outlook.NameSpace
Dim objFav As Outlook.MAPIFolder, objPFRoot As Outlook.MAPIFolder
Dim objFolder As Outlook.MAPIFolder, objAllPF As Outlook.MAPIFolder

Set objNS = Application.GetNamespace("MAPI")
Set objAllPF = objNS.GetDefaultFolder(olPublicFoldersAllPublicFolders)
Set objPFRoot = objAllPF.Parent
Set objFav = objPFRoot.Folders("Favorites")

Set objNS = Nothing
Set objAllPF = Nothing
Set objPFRoot = Nothing
Set objFolder = Nothing
End Sub

--
Eric Legault - Outlook MVP, MCDBA, MCTS (SharePoint programming, etc.)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/
 
Back
Top