自己写的一个vc操作word的例子

//需要初始化一个com对象

AfxOleInit();

 

//这是active控件中添加的方法代码完成将字符串写入到word文档中，然后保存指定文件路径下的文件名，然后退出

#include "msword.h"
#include <atlbase.h>
BOOL CWordocx4Ctrl::saveword(LPCTSTR str)
{
 // TODO: Add your dispatch handler code here
    _Application app;//创建一个word对象
 app.CreateDispatch(_T("Word.Application"));//启动word对象
 app.SetVisible(TRUE);

 Documents docs=app.GetDocuments();//创建一个文档对象
 CComVariant Template(_T(""));//所使用的模板名称
 CComVariant NewTemplate(false),DocumentType(0),Visible;
 docs.Add(&Template,&NewTemplate,&DocumentType,&Visible);//设置文档属性

 Selection sel=app.GetSelection();//创建一个文档选区
    sel.TypeText(str);//向文档选区输入字符
 
       /*这是保存word文档对象保存的宏
     ChangeFileOpenDirectory "C:/Documents and Settings/kk/桌面/"
        ActiveDocument.SaveAs FileName:="123.doc", FileFormat:=wdFormatDocument, _
        LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
        :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
        SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
        False
        */
     _Document doc=app.GetActiveDocument();//获得当前活动文档对象
  //初始化保存文档的参数值
  CComVariant FileName(_T("d://word.doc")), FileFormat(0),
        LockComments(false), Password(_T("")), AddToRecentFiles(true),
  WritePassword(_T("")), ReadOnlyRecommended(false),
        EmbedTrueTypeFonts(false), SaveNativePictureFormat(false),
        SaveFormsData(false), SaveAsAOCELetter(false);
  COleVariant vOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);//针对word2003参数补齐，声明
     //保存当前文档
  doc.SaveAs(&FileName, &FileFormat,&LockComments, &Password,
   &AddToRecentFiles, &WritePassword, &ReadOnlyRecommended,
         &EmbedTrueTypeFonts, &SaveNativePictureFormat,
         &SaveFormsData, &SaveAsAOCELetter, vOptional, vOptional,
         vOptional,vOptional,vOptional);
  //释放资源
  sel.ReleaseDispatch();
     doc.ReleaseDispatch();
  docs.ReleaseDispatch();
  //退出word
  CComVariant SaveChanges(false),OriginalFormat,RouteDocument;
  app.Quit(&SaveChanges,&OriginalFormat,&RouteDocument);
     app.ReleaseDispatch();
  return TRUE;
}