如何在电子邮件到达 Outlook 2013 时启动 URL

【问题标题】：How to launch a URL when an email arrives on Outlook 2013如何在电子邮件到达 Outlook 2013 时启动 URL
【发布时间】：2016-01-18 21:20:38
【问题描述】：

我想在电子邮件到达 Outlook 时启动一个 URL。网址是：

xyz.host/shared/pdf/DisplayPdf.php?Reservation="6diggitNumber"&ForcePrint=true"

是否有可能使用邮件中包含的 6 位数字调用邮件到达时的 URL？？

Sub LaunchURL(Item As Outlook.MailItem)
    Shell ("C:\Program Files\Internet Explorer\IEXPLORE.EXE" & " " & Item.Body)
End Sub

不适合我

【问题讨论】：

您是否在 Outlook 的传入规则之外运行此代码？您是否尝试过 VBA 创建 IE 对象和 .navigate=url 方法？将 Internet Explorer 与 VBA 结合使用会有很多内容。

标签： vba email outlook

【解决方案1】：

差不多了，只需要稍微改变你的字符串连接：

Sub LaunchURL(Item As Outlook.MailItem)
    Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE ""xyz.host/shared/pdf/DisplayPdf.php?Reservation=""" & Item.Body & """&ForcePrint=true"
End Sub

当您Shell Internet Explorer 时，您可以将 URL 作为参数传递。您只需要为 URL 构建字符串并将其作为参数传递，如上例所示。

根据您的示例，我假设您希望在电子邮件正文中的预订号码周围使用语音标记 "，如果不是（我建议您使用 php $_GET 方法时可能会出现这种情况) 然后删除它们 - 看起来像这样：

Sub LaunchURL(Item As Outlook.MailItem)
    Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE ""xyz.host/shared/pdf/DisplayPdf.php?Reservation=" & Item.Body & "&ForcePrint=true"
End Sub

【讨论】：