新Outlook(2023)设计中ComObjActive("Outlook.Application")失效求助

1. 如何查找程序对应的OLE编程标识符？ #

有几种实用方法可以获取程序的OLE标识符：

• 查看注册表：打开注册表编辑器（regedit），导航到HKEY_CLASSES_ROOT，搜索目标程序名称（比如Outlook），找到带有CLSID子项的键，键名就是对应的标识符；也可以直接进入HKEY_CLASSES_ROOT\CLSID，查看各条目下的ProgID值。
• 用PowerShell查询：执行命令 Get-CimInstance Win32_ProgID | Where-Object {$_.Description -match "Outlook"}，可筛选出所有和Outlook相关的ProgID。
• 使用OLEView工具：微软的OLEView工具能列出系统中所有注册的COM对象，直接搜索程序名称就能找到对应的标识符和CLSID。

2. 新Outlook设计下获取Outlook对象的方法 #

新Outlook基于Web架构，原有的Outlook.Application可能无法正常调用，试试以下方案：

• 替换为新标识符：用Outlook.Desktop.Application替代原代码中的Outlook.Application，即执行 olk := ComObjActive("Outlook.Desktop.Application")，这是新Outlook常用的COM标识符。
• 设置新Outlook为默认客户端：如果系统同时存在新旧版Outlook，需在Windows设置中将新Outlook设为默认邮件应用，避免COM对象指向旧版程序。
• 先启动Outlook再获取对象：如果脚本执行时Outlook未启动，先添加启动命令 Run, outlook.exe，等待几秒后再执行ComObjActive调用。
• 通过CLSID直接调用：如果ProgID无效，通过注册表或OLEView查到新Outlook对应的CLSID，用 ComObjActive("{CLSID值}") 的方式直接调用对象。

内容的提问来源于stack exchange，提问作者Hubisan