使用VC 6_0实现自动生成Word表格_TimeWalker_百度空间.docVIP

使用VC 6_0实现自动生成Word表格_TimeWalker_百度空间 使用VC 6.0实现自动生成Word表格_TimeWalker_百度空间 用户名: 密码: 登录 注册 TimeWalker 主页博客相册|个人档案 |好友 |i贴吧 查看文章 使用VC 6.0实现自动生成Word表格2010-10-16 11:25最近在VC6.0 环境下开发一个管理系统，界面开发花了不少功夫却感觉华而不实，自动生成word表格的功能实现了，倒觉得蛮实用的 （1）首先，向你的项目中添加word 2003类型库：方法是在MFC ClassWizard中点击按钮Add Class，选择From a type library,在弹出的浏览对话框中，浏览找到office 2003安装路径下的msword.olb文件，例如：C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB,然后选择所需要的类（参考第（3）步），确定 （2）在使用到这些类型的类的头文件或者cpp文件的开头，包含以下头文件： #include msword.h （3）定义对象 _Application oWordApp; Documents oDocs; _Document oDoc; Range range; Paragraph paragraph; Paragraphs paragraphs; Cell cell; Cells cells; Table table; Tables tables; Border border; Borders borders; _Font font; PageSetup pagesetup; （4）创建或者连接word对象：初始化连接,判断当前系统是否有word进程，然后然后创建或连接对象。 LPDISPATCH pDisp; LPUNKNOWN pUnk; CLSID clsid; CoInitialize(NULL); CLSIDFromProgID(LWord.Application,clsid); if(GetActiveObject(clsid,NULL,pUnk)==S_OK) { pUnk- QueryInterface(IID_IDispatch,(void **)pDisp); oWordApp.AttachDispatch(pDisp); } else { if(!oWordApp.CreateDispatch(Word.Application)) { AfxMessageBox(创建Word服务失败!); return FALSE; } } （5）初始化文档，生成WORD表格 oDocs.ReleaseDispatch(); oWordApp.m_bAutoRelease=true; BeginWaitCursor(); oDocs=oWordApp.GetDocuments(); COleVariant vOpt(DISP_E_PARAMNOTFOUND, VT_ERROR); oDoc=oDocs.Add(vOpt,vOpt,vOpt,vOpt);//加新文档 pagesetup=oDoc.GetPageSetup(); pagesetup.SetOrientation(1);//横向 paragraphs=oDoc.GetParagraphs(); //生成第一个表 paragraph=paragraphs.GetLast();//以当前段落最后一行为表起始位置 range=paragraph.Ge