十万火急，vc与word问题 在线等待

Question

_Application app;
Documents docs;
_Document doc;

CLSID clsid;
IUnknown * pUnk=NULL;
LPDISPATCH pDisp;
BOOL bClose=FALSE;
    COleVariant covTrue((short)TRUE), covFalse((short)FALSE), covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
if(::CLSIDFromProgID(L"Word.Application", &clsid)!=S_OK)// from registry
{
MessageBox("没有安装Word!", "错误", MB_OK | MB_ICONERROR);
return ;
}

try
{
if(GetActiveObject(clsid, NULL, &pUnk) == S_OK) 
{
VERIFY(pUnk->QueryInterface(IID_IDispatch,(void**) &pDisp) == S_OK);
app.AttachDispatch(pDisp);
}
}然后在GetActiveObject(clsid, NULL, &pUnk）就不成功了
大侠们，怎么回事啊?

Answer 1

前面加上ConInitialize(NULL);试试呢