怎样用程序读取WORD文件内容

baxoog 2001-08-01 09:38:46
怎样用程序读取WORD文档不管用什么方式用自动化也行希望各位大蚜能答复
...全文
127 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
wanliduxing 2001-08-01
  • 打赏
  • 举报
回复
下面是用程序调用WORD的例子。可以参考

以下是创建MFC应用程序的步骤:

(1)使用AppWizard创建一个新的MFC AppWizard(EXE)工程,命名为"Embed_Word"

(2)选择单文档视图(SDI)结构,在第3步中需要选中Container,以提供容器支持。 其它都为默认。在ClassView中将产生如下类:

应用类: CEmbed_WordApp in Embed_Word.h and Embed_Word.cpp

框架类: CMainFrame in MainFrm.h and MainFrm.cpp

文档类: CEmbed_WordDoc in Embed_WordDoc.h and Embed_WordDoc.cpp

视图类: CEmbed_WordView in Embed_WordView.h and Embed_WordView.cpp

容器类: CEmbed_WordCntrItem in CntrItem.h and CntrItem.cpp

(3)在View菜单中,选ClassWizard,选Automation选项卡,选Add Class,选择From a TypeLibrary, 在Office目录中选中Microsoft Word 97/2000 类型库Word8.olb或Word9.olb,会将把类型库中的所有类添加到你的工程中。这时,ClassView中会多出几十个类,可以通过这些类提供的接口来实现必要的功能。

(4)在CCntrItem.h中添加获取标准COM接口IDispach的函数:

LPDISPATCH GetIDispatch(); 其函数实现如下:

LPDISPATCH CEmbed_WordCntrItem::GetIDispatch()

{

ASSERT_VALID(this);

ASSERT(m_lpObject != NULL);

LPUNKNOWN lpUnk = m_lpObject;

Run();

LPOLELINK lpOleLink = NULL;

if(m_lpObject->QueryInterface(IID_IOleLink,(LPVOID FAR*)&lpOleLink)== NOERROR)

{

ASSERT(lpOleLink != NULL);

lpUnk = NULL;

if(lpOleLink->GetBoundSource(&lpUnk) != NOERROR)

{

TRACE0("Warning: Link is not connected!\n");

lpOleLink->Release();

}

ASSERT(lpUnk != NULL);

}

LPDISPATCH lpDispatch = NULL;

if(lpUnk->QueryInterface(IID_IDispatch,(LPVOID FAR*)&lpDispatch) != NOERROR)

{

TRACE0("Waring: does not support IDispatch!\n");

return NULL;

}

ASSERT(lpDispatch != NULL);

return lpDispatch;

}

通过此函数来返回标准COM接口IDispatch。

(5)在Embed_WordView.cpp中添加对"MSWord8.h"的引用:#include "MSWord8.h",如使用Word2000,则包含对"MSWord9.h"的引用。 然后在视类CEmbed_WordView中添加函数EmbedAutomateExcel():

void CEmbed_WordView::EmbedAutomateWord()

{

BeginWaitCursor();

CEmbed_WordCntrItem* pItem = NULL;

TRY

{

CEmbed_WordDoc* pDoc = GetDocument();

ASSERT_VALID(pDoc);

pItem = new CEmbed_WordCntrItem(pDoc);

ASSERT_VALID(pItem);

GetClientRect(&pItem->rect);

CLSID clsid;

if(FAILED(::CLSIDFromProgID(L"Word.document",&clsid)))

AfxThrowMemoryException();

if(!pItem->CreateNewItem(clsid))

AfxThrowMemoryException();

ASSERT_VALID(pItem);

pItem->DoVerb(OLEIVERB_SHOW, this);

m_pSelection = pItem;

pDoc->UpdateAllViews(NULL);

LPDISPATCH lpDisp;

lpDisp = pItem->GetIDispatch();

}

CATCH(CException, e)

{

if (pItem != NULL)

{

ASSERT_VALID(pItem);

pItem->Delete();

}

AfxMessageBox(IDP_FAILED_TO_CREATE);

}

END_CATCH

EndWaitCursor();

}

如果仔细研究过这段代码,会发现它同AppWizard自动生成的OnInsertObject()函数有着惊人的相似程度,看一下View类中的 OnInsertObject() 方法,对其中的注释引起了我们的兴趣,因为它和我们刚写的方法有惊人的相似。事实上,我们刚才写的只不过是OnInsertObject()的一个特例:OnInsertObject()允许用户从可用的OLE对象列表中选择其一插入到应用程序中。因为在此我们只需对Word进行自动化,所以派生了这一行为。

(6)为了在程序刚启动时便将Word嵌入到程序中来,还需在视类的OnInitialUpdate()函数中添加代码:

void CEmbed_WordView::OnInitialUpdate()

{

CView::OnInitialUpdate();

EmbedAutomateWord(); //将Word嵌入

m_pSelection = NULL;

}

(7)为了使嵌入的工作区占满整个客户区可以通过修改OnDraw函数来实现:

void CEmbed_WordView::OnDraw(CDC* pDC)

{

CEmbed_WordDoc* pDoc = GetDocument();

ASSERT_VALID(pDoc);

if (m_pSelection == NULL)

{

POSITION pos = pDoc->GetStartPosition();

m_pSelection = (CEmbed_WordCntrItem*)pDoc->GetNextClientItem(pos);

}

if (m_pSelection != NULL)

{

CRect rect;

GetClientRect(&m_pSelection->rect);

m_pSelection->OnGetItemPosition(rect);

m_pSelection->Draw(pDC,rect);

}

}

16,548

社区成员

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

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

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