Hello everyone.

Firstly, thank you to Sue Mosher for her assistance on a recent question I
posted and her solution did the trick.

I now have another question!

Is it possible to use some code to empty the deleted items folder as part of
a macro?

Many thanks.

Am Thu, 24 Aug 2006 04:56:02 -0700 schrieb Darren Hermes:

Dim Items as Outlook.Items
Dim i as Long
Set Items=Application.Session.GetDefaultFolder(olFolde rDeletedItems).Items
For i=Items.Count To 1 Step-1
Items(i).Delete
Next

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Hello everyone.

Firstly, thank you to Sue Mosher for her assistance on a recent question I
posted and her solution did the trick.

I now have another question!

Is it possible to use some code to empty the deleted items folder as part
of
a macro?

Many thanks.

On Fri, 25 Aug 2006 07:15:31 +0200, "Michael Bauer [MVP - Outlook]"
wrote in microsoft.public.outlook.program_vba:

Am Thu, 24 Aug 2006 04:56:02 -0700 schrieb Darren Hermes:

Dim Items as Outlook.Items
Dim i as Long
Set Items=Application.Session.GetDefaultFolder(olFolde rDeletedItems).Items
For i=Items.Count To 1 Step-1
Items(i).Delete
Next

While we're on this subject - I've been looking for a long time for a
way to purge items from a folder's dumpster with VBA.

Has anyone found a way, except by SendKeys, of doing that?

Firstly, thank you to Sue Mosher for her assistance on a recent question I
posted and her solution did the trick.

I now have another question!

Is it possible to use some code to empty the deleted items folder as part of
a macro?

--
Michael Bednarek http://mbednarek.com/ "POST NO BILLS"