vc++2005 操作word2003(补)

vc++2005 操作word2003(补)

1检测word是否运行
 CLSID clsid;
 HRESULT hr;
 hr=::CLSIDFromProgID(_T("Word.Application"),&clsid); //通过ProgID取得CLSID
 if(FAILED(hr))
 {
  AfxMessageBox(_T("没有安装WORD"));
  return;
 }

 IUnknown *pUnknown=NULL;
 IDispatch *pDispatch=NULL;
 hr=::GetActiveObject(clsid,NULL,&pUnknown); //查找是否有WORD程序在运行
 if(FAILED(hr))
 {
  AfxMessageBox(_T("WORD应用程序没有运行"));
  return;
 }
2去掉关闭Word时提示保存Normal模板

 CComVariant OriginalFormat,RouteDocument;
 _variant_t vSaveChanges(wdPromptToSaveChanges);

 TemplatePtr pTemplate;
 pTemplate=wordApp.get_NormalTemplate();
 if (pTemplate)
 {
  pTemplate->put_Saved(VARIANT_TRUE);
 }
 wordApp.ReleaseDispatch(); //释放对象指针。