如何使用COleClientItem的IDispatch接口

如何使用COleClientItem的IDispatch接口?

我创建了一个如何使用COleClientItem对象,我想使用它的自动化方法.有什么方

法来获得IDispatch的接口?我试过以CCmdTarget为基类的的GetIDispatch函数但

却出错,我用过EnableAutomation和GetIDispatch,却什么也没得到.

MSDN中有一篇关于这个的文章(TN039).如下的代码也可能是你所需要的:

LPDISPATCH CMyClientItem::GetIDispatch()

{

ASSERT_VALID(this);

ASSERT(m_lpObject != NULL);

LPUNKNOWN lpUnk = m_lpObject;

Run(); // must be running

LPOLELINK lpOleLink = NULL;

if (m_lpObject->QueryInterface(IID_IOleLink,

(LPVOID FAR*)&lpOleLink) == NOERROR)

{

ASSERT(lpOleLink != NULL);

lpUnk = NULL;

if (lpOleLink->GetBoundSource(&lpUnk) != NOERROR)

{

TRACE0("Warning: Link is not connected!\n");

lpOleLink->Release();

return NULL;

}

ASSERT(lpUnk != NULL);

}

LPDISPATCH lpDispatch = NULL;

if (lpUnk->QueryInterface(IID_IDispatch, &lpDispatch)

!= NOERROR)

{

TRACE0("Warning: does not support IDispatch!\n");

return NULL;

}

ASSERT(lpDispatch != NULL);

returnlpDispatch; }