如何批量导出发送失败的邮箱地址

dpx2000 · 发表于 2009-4-8 17:42

本人因工作原因，经常要群发邮件。退信有outlook2007接收。因为某些原因经常会收到一些系统退信。如下图所示。请教高手如何在outlook中批量导出发送失败的地址？

小破 · 发表于 2009-4-19 09:07

我也想知道,请高手解答

小破 · 发表于 2009-4-19 23:20

这段代码可以在OUTLOOK中运行,却不能EXCEL中运行,请问要怎样修改??谢谢大家 !

Set myNamespace = Application.GetNamespace("MAPI")
Set myfolder = myNamespace.GetDefaultFolder(olFolderDeletedItems)
For i = 1 To myfolder.Items.Count
Set myItem = myfolder.Items(i)
Str =Str+ myItem.Body
Next i

		自动登录	找回密码
密码			免费注册

[求助] 如何批量导出发送失败的邮箱地址