请问怎么解析一个WORD文档?

boolpc 2009-11-27 09:55:43
包括字体,颜色,大小,内容等等。请指点下,谢谢。
...全文
151 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
boolpc 2009-11-27
  • 打赏
  • 举报
回复
有什么COM提供这样的接口呢?
carlkwan 2009-11-27
  • 打赏
  • 举报
回复
可以通过COM接口访问word文档
对于docx格式的,其实是zip里面装xml
boolpc 2009-11-27
  • 打赏
  • 举报
回复
看见兔子真好~没想到这么复杂的说。
MoXiaoRab 2009-11-27
  • 打赏
  • 举报
回复
如下是转帖

近日作一个小东西涉及到对汇总结果的打印,由于打印只在一台特定的机器进行所以考虑使用Word来实现,这样比较简单而且很专业。开始的时候这个东西没有这项功能后来我闲的无聊看看是否可以实现(以前从来没有做过这方面的东西),于是乎搞了一下也不是很难,一点心得大家给指点一二,使用的是Office2000,工程类型是MFC的对话框。先看看需要使用到的东东: 1.View->ClassWizard->Automation->Add Class From Library:定位到你安装Office的目录找到MSWord9.Olb 2.打开后把所有的类都选中倒入到你的工程(反正也是搞一回彻底一点:P) 3.在你的对话框头文件中加上#include"msword9.h" OK了准备工作搞定之后就可以玩儿转Word了,先来一个简单的
void TestWord1()
{
_Application app;
COleVariant vTrue((short)TRUE), vFalse((short)FALSE);
app.CreateDispatch(_T("Word.Application"));
app.SetVisible(FALSE);
//Create New Doc
Documents docs=app.GetDocuments();
CComVariant tpl(_T("")),Visble,DocType(0),NewTemplate(false);
docs.Add(&tpl,&NewTemplate,&DocType,&Visble);
//Add Content:Text
Selection sel=app.GetSelection();
sel.TypeText(_T("\t\t\t\t\t第一次玩儿Word\r\n"));
sel.TypeText(_T("\t\t\t\t\t\t\t\t----------先来一个简单的\r\n"));
sel.ReleaseDispatch();
docs.ReleaseDispatch();
app.SetVisible(TRUE);
app.ReleaseDispatch();
}
大家都应该使用过Word提供的表格功能很是专业,如果在作一些数据库开发之类的软件对汇总的数据进行打印是常见的功能,这个如果用Word来实现个人感觉不错,废话少说说练咱就练。
void CWordTestDlg::TestWord2()
{
_Application app;
COleVariant vTrue((short)TRUE), vFalse((short)FALSE);
app.CreateDispatch(_T("Word.Application"));
app.SetVisible(FALSE);
//Create New Doc
Documents docs=app.GetDocuments();
CComVariant tpl(_T("")),Visble,DocType(0),NewTemplate(false);
docs.Add(&tpl,&NewTemplate,&DocType,&Visble);
//Add Content:Text
Selection sel=app.GetSelection();
sel.TypeText(_T("\t\t\t\t\t\t\t情况汇总\r\n"));
sel.TypeText(_T("\t\t\t\t\t\t\t\t----------*******跨国公司\r\n"));
COleDateTime dt=COleDateTime::GetCurrentTime();
CString strDT=dt.Format("%Y-%m-%d");
CString str("\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t");
str+=strDT;
str+="\r\n";
sel.TypeText(str);
//Add Table
_Document saveDoc=app.GetActiveDocument();
Tables tables=saveDoc.GetTables();
CComVariant defaultBehavior(1),AutoFitBehavior(1);
tables.Add(sel.GetRange(),6,11,&defaultBehavior,&AutoFitBehavior);
Table table=tables.Item(1);
sel.TypeText(_T("Test1"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short
(0)));

sel.TypeText(_T("Test2"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test3"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test4"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short<(0)));
sel.TypeText(_T("Test5"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test6"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test7"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test8"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test9"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test10"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test11"));
app.SetVisible(TRUE);
table.ReleaseDispatch();
tables.ReleaseDispatch();
sel.ReleaseDispatch();
docs.ReleaseDispatch();
saveDoc.ReleaseDispatch();
app.ReleaseDispatch();
}
上面说了如何制作一个简单的表格,在实际应用中会发现表格的种类很多其中对于单元格要求合并的情形很多,这样出来的表格比较专业让客户看起来也很是舒服,不喔喔了看看下面的代码就全明白了。
void CWordTestDlg::TestWord3()
{
_Application app;
COleVariant vTrue((short)TRUE), vFalse((short)FALSE);
app.CreateDispatch(_T("Word.Application"));
app.SetVisible(FALSE);
//Create New Doc
Documents docs=app.GetDocuments();
CComVariant tpl(_T("")),Visble,DocType(0),NewTemplate(false);
docs.Add(&tpl,&NewTemplate,&DocType,&Visble);
//Add Content:Text
Selection sel=app.GetSelection();
sel.TypeText(_T("\t\t\t\t\t\t\t情况汇总\r\n"));
sel.TypeText(_T("\t\t\t\t\t\t\t\t----------*******跨国公司\r\n"));
COleDateTime dt=COleDateTime::GetCurrentTime();
CString strDT=dt.Format("%Y-%m-%d");
CString str("\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t");
str+=strDT;
str+="\r\n";
sel.TypeText(str);
//Add Table
_Document saveDoc=app.GetActiveDocument();
Tables tables=saveDoc.GetTables();
CComVariant defaultBehavior(1),AutoFitBehavior(1);
tables.Add(sel.GetRange(),7,11,&defaultBehavior,&AutoFitBehavior);
Table table=tables.Item(1);
sel.TypeText(_T("Test1"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test2"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test3"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test4"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test5"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test6"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test7"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test8"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test9"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test10"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test11"));
for(int i=2;i<7;i+=2)
{
Cell c1=table.Cell(i,1);
Cell c2=table.Cell(i+1,1);
c1.Merge(c2);
c1.ReleaseDispatch();
c2.ReleaseDispatch();
}
app.SetVisible(TRUE);
table.ReleaseDispatch();
tables.ReleaseDispatch();
sel.ReleaseDispatch();
docs.ReleaseDispatch();
saveDoc.ReleaseDispatch();
app.ReleaseDispatch();
app.SetVisible(TRUE);
}


下面说说如何填充单元格以及如何对合并后的单元格的内容让他居中显示这样能够看得舒服一点:)。代码如下所示:
void CWordTestDlg::TestWord4()
{
_Application app;
COleVariant vTrue((short)TRUE), vFalse((short)FALSE);
app.CreateDispatch(_T("Word.Application"));
app.SetVisible(FALSE);
//Create New Doc
Documents docs=app.GetDocuments();
CComVariant tpl(_T("")),Visble,DocType(0),NewTemplate(false);
docs.Add(&tpl,&NewTemplate,&DocType,&Visble);
//Add Content:Text
Selection sel=app.GetSelection();
sel.TypeText(_T("\t\t\t\t\t\t\t情况汇总\r\n"));
sel.TypeText(_T("\t\t\t\t\t\t\t\t----------*******跨国公司\r\n"));
COleDateTime dt=COleDateTime::GetCurrentTime();
CString strDT=dt.Format("%Y-%m-%d");
COleDateTimeSpan span(1,0,0,0);
CString strDT1=(dt-span).Format("%Y-%m-%d");
CString strDate[]={strDT1,strDT};
CString str("\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t");
str+=strDT;
str+="\r\n";
sel.TypeText(str);
//Add Table
_Document saveDoc=app.GetActiveDocument();
Tables tables=saveDoc.GetTables();
CComVariant defaultBehavior(1),AutoFitBehavior(1);
tables.Add(sel.GetRange(),7,11,&defaultBehavior,&AutoFitBehavior);
Table table=tables.Item(1);
sel.TypeText(_T("Test1"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test2"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test3"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test4"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test5"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test6"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test7"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test8"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test9"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test10"));
sel.MoveRight(COleVariant((short)1),COleVariant(short(1)),COleVariant(short(0)));
sel.TypeText(_T("Test11"));
int i=0,j=0;
for(i=2;i<7;i+=2)
{
Cell c1=table.Cell(i,1);
Cell c2=table.Cell(i+1,1);
c1.Merge(c2);
c1.ReleaseDispatch();
c2.ReleaseDispatch();
}
Cell c;
CString strName[]={"yingkou","zyq654321","iwaswzq"};
for(j=0,i=0;i<3;++i,j+=2)
{
c=table.Cell(j+2,1);
c.Select();
Cells cs=sel.GetCells();
cs.SetVerticalAlignment(1);
sel.TypeText(strName[i]);
sel.MoveDown(COleVariant((short)5),COleVariant(short(1)),COleVariant(short(0)));
cs.ReleaseDispatch();
c.ReleaseDispatch();
}
c=table.Cell(7,1);
c.Select();
for(i=0,j=0;i<6;++i,++j)
{
if(i%2==0)
j=0;
sel.TypeText(strDate[j]);
sel.MoveUp(COleVariant((short)5),COleVariant(short(1)),COleVariant(short(0)));
}
c.ReleaseDispatch();
app.SetVisible(TRUE);
table.ReleaseDispatch();
tables.ReleaseDispatch();
sel.ReleaseDispatch();
docs.ReleaseDispatch();
saveDoc.ReleaseDispatch();
app.SetVisible(TRUE);
app.ReleaseDispatch();
}
boolpc 2009-11-27
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 jason176374 的回复:]
OFFICE的东西都提供COM接口去处理他们的文件。
你搜索“WORD VC”这样的词的话就会看到
[/Quote]
谢谢啦。
jason176374 2009-11-27
  • 打赏
  • 举报
回复
OFFICE的东西都提供COM接口去处理他们的文件。
你搜索“WORD VC”这样的词的话就会看到

16,551

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • Creator Browser
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了,记忆之中,与CSDN的年龄几乎差不多。随着时间的推移,MFC技术渐渐的偏离了开发主流,若干年之后的今天,当我们面对着微软的这个经典之笔,内心充满着敬意,那些曾经的记忆,可以说代表着二十年前曾经的辉煌……
        向经典致敬,或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天,我们期待着MFC技术能够恢复其曾经的辉煌,或许这个期待会永远成为一种“梦想”,或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代,期待更好的互联网技术能够使得MFC技术框架得以重现活力,……

试试用AI创作助手写篇文章吧