通过此函数来返回标准COM接口IDispatch。
（5）在Embed_WordView.cpp中添加对"MSWord8.h"的引用：#include "MSWord8.h"，如使用Word2000,则包含对"MSWord9.h"的引用。 然后在视类CEmbed_WordView中添加函数EmbedAutomateExcel()
- void CEmbed_WordView::EmbedAutomateWord()
- {
- BeginWaitCursor();
- CEmbed_WordCntrItem* pItem = NULL;
- TRY
- {
- CEmbed_WordDoc* pDoc = GetDocument();
- ASSERT_VALID(pDoc);
- pItem = new CEmbed_WordCntrItem(pDoc);
- ASSERT_VALID(pItem);
- GetClientRect(&pItem->rect);
- CLSID clsid;
- if(FAILED(::CLSIDFromProgID(L"Word.document",&clsid)))
- AfxThrowMemoryException();
- if(!pItem->CreateNewItem(clsid))
- AfxThrowMemoryException();
- ASSERT_VALID(pItem);
- pItem->DoVerb(OLEIVERB_SHOW, this);
- m_pSelection = pItem;
- pDoc->UpdateAllViews(NULL);
- LPDISPATCH lpDisp;
- lpDisp = pItem->GetIDispatch();
- }
- CATCH(CException, e)
- {
- if (pItem != NULL)
- {
- ASSERT_VALID(pItem);
- pItem->Delete();
- }
- AfxMessageBox(IDP_FAILED_TO_CREATE);
- }
- END_CATCH
- EndWaitCursor();
- }
如果仔细研究过这段代码，会发现它同AppWizard自动生成的OnInsertObject()函数有着惊人的相似程度，看一下View类中的 OnInsertObject() 方法，对其中的注释引起了我们的兴趣，因为它和我们刚写的方法有惊人的相似。事实上，我们刚才写的只不过是OnInsertObject()的一个特例：OnInsertObject()允许用户从可用的OLE对象列表中选择其一插入到应用程序中。因为在此我们只需对Word进行自动化，所以派生了这一行为。
（6）为了在程序刚启动时便将Word嵌入到程序中来，还需在视类的OnInitialUpdate()函数中添加代码：
- void CEmbed_WordView:nInitialUpdate()
