[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

How do I send all messages in outlook, send/receive does not work it.

Posted on 2008-11-04
3
Medium Priority
?
194 Views
Last Modified: 2010-04-21
For some odd reason a previous admin had reports automatically sent via email from a commercial email account with Qwest instead of using our Exchange services. That admin has since been deposed...enter me. That commercial email account he was using just closed so I have about 700 messages queued up in the Outlook profile that I need to send.  I copied the messages from the outbox into a new mailbox we set up on exchange.  All the emails are now in the Outbox with the "to:" field already filled out with their recipients address.  I've tried hitting send/receive and it wont send them out. Other than manually opening each one and hitting send, how can i get all of them to send?
0
Comment
Question by:L3370
  • 2
3 Comments
 
LVL 59

Accepted Solution

by:
Chris Bottomley earned 500 total points
ID: 22880074
Hello L3370,

Not sure but depending on if you have the security pack from SP3 then the following macro when executed in outlook may help

Regards,
Chris
Sub clearupsend()
Dim mai As mailitem
Dim cnt As Integer
Dim fldr As MAPIFolder 
    Set fldr = Application.GetNamespace("mapi").GetDefaultFolder(olFolderOutbox)
    For cnt = fldr.Items.count To 1 Step -1
        Set mai = fldr.Items(cnt)
        mai.Send
    Next
End Sub

Open in new window

0
 
LVL 9

Author Closing Comment

by:L3370
ID: 31513245
That worked perfectly. I didn't even bother to think of making a macro to do this (like it would matter because I'm a terrible programmer and would have took me 4 hours.)

Again, thanks Chris. Well done.
0
 
LVL 59

Expert Comment

by:Chris Bottomley
ID: 22880621
Glad to help .. I honestly wasn't sure that the mechanism would work ... just thought it was worth a try.  So I learned a little bit here which always pleases.

Chris
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Are you looking for the options available for exporting EDB files to PST? You may be confused as they are different in different Exchange versions. Here, I will discuss some options available.
Take a look at these 6 Outlook Email management tools which can augment the working and performance of Microsoft Outlook to give you a more rewarding emailing experience.
This video shows how to remove a single email address from the Outlook 2010 Auto Suggestion memory. NOTE: For Outlook 2016 and 2013 perform the exact same steps. Open a new email: Click the New email button in Outlook. Start typing the address: …
CodeTwo Sync for iCloud (http://www.codetwo.com/sync-for-icloud?sts=6554) automatically synchronizes your Outlook 2016, 2013, 2010 or 2007 folders with iCloud folders available via iCloud Control Panel. This lets you automatically sync them with…
Suggested Courses

872 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question