我在我的 MS Office 的 COM 加载项中有以下代码,用于遍历 winword 文档中的所有超链接,然后解析它们:
...
HRESULT hr;
ULONG nRet;
CComQIPtr<MSWORD::Hyperlinks> hylinks = doc->Hyperlinks; // CComQIPtr<_Document> doc
ATLASSERT(hylinks);
IEnumVARIANTPtr pEnum = hylinks->Get_NewEnum();
for (int i = 1; i <= hylinks->Count; i++)
{
VARIANT v = {};
hr = pEnum->Next(1, &v, &nRet);
if (FAILED(hr)) continue;
CComQIPtr<MSWORD::Hyperlink> link;
ATLASSERT(link);
hr = hylinks->raw_Item(&v, &link);
if (FAILED(hr)) continue;
...
// parse hyperlink's address
}
...
调用 raw_Item() 时的结果 (hr) 为 80020005 (DISP_E_TYPEMISMATCH))。当我浏览 Shapes 时,这样的代码没有问题。
有人可以帮助我吗?