如何从外部应用程序打开Outlook邮件

我想通过OLE从外部应用程序向Outlook发送命令，以便在本机查看器中打开特定消息。我有消息的入口。有人知道怎么做吗？我四处搜索，找不到任何指导。

类似以下（VB脚本）的内容可以完成这项工作：

set App = CreateObject("Outlook.Applicatiobn")
set NS = App.GetNamespace("MAPI")
NS.Logon
set Msg = NS.GetItemFromID(YourEntryId)
Msg.Display(true)