如何使用 vbs 回复电子邮件 [重复]答案

【问题标题】：How can I reply email using vbs [duplicate]如何使用 vbs 回复电子邮件 [重复]
【发布时间】：2021-10-05 20:02:52
【问题描述】：

我正在尝试通过Outlook.application 对象获取邮件项，并通过某些主题命名规则回复电子邮件。现在我可以获取邮件项，按主题过滤邮件。如何将下一步移至reply 电子邮件？谢谢

到目前为止，Belo 是我的代码：

Set objOutlook = CreateObject("Outlook.Application")
Set MailItem = objOutlook.Session.Folders("XXX@XXX.com")
For Each eMail in MailItem.Items
    If InStr(1,Trim(eMail.Subject),"Production",vbTextCompare) > 0 then
    wscript.echo "This is needed email, need to reply"
    End If
Next

【问题讨论】：

标签： outlook vbscript

【解决方案1】：

对于 wscript 使用，您可以修改中找到的示例 Outlook Reply or ReplyAll to an Email

您将电子邮件放入您的邮件项目循环中

用它代替 wscript.echo 行

Set olReply = eMail.ReplyAll
olReply.HTMLBody = "Hello, Thank you. " & vbCrLf & olReply.HTMLBody
olReply.Display
olReply.Send

【讨论】：

我替换了 wscript.echo 行的代码，它可以工作了！非常感谢！
优秀 - 请将其标记为答案 - 欢迎来到 Stack Overflow