如何判断机器上是否安装了Outlook

[robinzo]

如题，解决马上给分！

[legend-never-die]

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\Outlook

判断在注册表中是否有该项

[王国凡]

利用 ProgID，程序如下：

CLSID clsid;
HRESULT hr = ::CLSIDFromProgID( L"Outlook.Application", &clsid );
if ( FAILED( hr ) )
{
DWORD nError = ::GetLastError();
char strError[8];
_itoa(nError, strError, 10);

::MessageBox(NULL, strError, "未安装 Outlook", MB_OK);
}
else
{
::MessageBox(NULL, "已经安装了 Outlook", "", MB_OK);
}

[robinzo]

谢谢两位