登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

图像处理 视频分析 机器视觉 模式识别

方向比努力更重要

 
 
 

日志

 
 
关于我

河北软件开发项目,电子警察卡口项目,公安天网项目,媒体流处理,数字图像处理。媒体服务器 RTSP、图像处理、车牌识别……DCT变换,H.264压缩

vc++操作word  

2010-09-18 15:15:06|  分类: VC++ |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
本文转载自VC→SOS《vc++操作word》

首先声明:此些代码已经通过FENG*RALF同志的测试,在word2003中不同发现MSWORD9.OLB文件,MSWORD.OLB倒是存在,另外自己写的类,保存函数可用,另存为函数缺少参数好像,以后再做修正。

_______________________________________________________________________________

最近根据项目需要,需要我去用 vc++6.0 作一个 ActiveX web 组件。自己从来没有接触过这方面的编程,这次是头一遭!所以咱就做了,不过倒很出乎我的意料,比我想象的要快很多就完成了。现将 vc++6.0 操作 word 部分的关键代码部分帖出来,共享给大家。

因为我在开发的时候遇到了很多问题,并且网上的资料很少,基本都是最基本的操作。所以帖出来,希望能让大家在开发的过程少走些弯路!

 

工具: vc++6.0 。

关键字: c++ , MFC 。

要求:系统安装 MS OFFICE 2000 。

过程:

准备工作:

1.       创建一个 MFC(EXE) 工程: MFC AppWizard ( exe ),工程为对话框形式(测试用)。

2.       在 CLASS VIEW 页面创建一个类:类名为: CWordOffice ,类的类型为: Class type : Generic Class 。

3.       在工具栏中找到 view -> class wizard -> Automation -> add class -> from a tye library ,然后选中 offfice 安装的目录中的 MSWORD9.OLB ,然后选中所有列出的类名,点 OK 完成。

 

准备工作完成,下面贴出相关部分的代码:

CWordOffice.h 中的手动写入的代码如下(自动生成的没有加入):

 

#include "atlbase.h"

#include "msword9.h"

class CWordOffice 

{

private:

    _Application m_wdApp;

    Documents m_wdDocs;

    _Document m_wdDoc;

    Selection m_wdSel;

    Range     m_wdRange;

    InlineShapes m_wdInlineShapes; 

    InlineShape m_wdInlineShape;

public:

    CWordOffice();

    virtual ~CWordOffice();

public:

    //操作

    //**********************创建新文档*******************************************

    BOOL CreateApp();                    //创建一个新的WORD应用程序

    BOOL CreateDocuments();                //创建一个新的Word文档集合

    BOOL CreateDocument();                //创建一个新的Word文档

    BOOL Create();                        //创建新的WORD应用程序并创建一个新的文档

    void ShowApp();                        //显示WORD文档

    void HideApp();                        //隐藏word文档

    //**********************打开文档*********************************************

    BOOL OpenDocument(CString fileName);//打开已经存在的文档。

    BOOL Open(CString fileName);        //创建新的WORD应用程序并打开一个已经存在的文档。

    BOOL SetActiveDocument(short i);    //设置当前激活的文档。

    //**********************保存文档*********************************************

    BOOL SaveDocument();                //文档是以打开形式,保存。

    BOOL SaveDocumentAs(CString fileName);//文档以创建形式,保存。

    BOOL CloseDocument();

    void CloseApp(); 

    //**********************文本书写操作*****************************************

    void WriteText(CString szText);        //当前光标处写文本

    void WriteNewLineText(CString szText, int nLineCount = 1); //换N行写字

    void WriteEndLine(CString szText);    //文档结尾处写文本

    void WholeStory();                    //全选文档内容

    void Copy();                        //复制文本内容到剪贴板

    void InsertFile(CString fileName);    //将本地的文件全部内容写入到当前文档的光标处。

    

    //**********************图片插入操作*****************************************

    void InsertShapes(CString fileName);//在当前光标的位置插入图片

    

    //**********************超链接插入操作*****************************************

    void InsertHyperlink(CString fileLink);//超级链接地址,可以是相对路径。

};

 

CWordOffice.c中的手写代码如下:

 

CWordOffice::CWordOffice()

{

}

CWordOffice::~CWordOffice()

{

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    //m_wdDoc.Save();

    m_wdApp.Quit(vFalse,    // SaveChanges.

             vTrue,            // OriginalFormat.

             vFalse            // RouteDocument.

             );

    //释放内存申请资源

    m_wdInlineShape.ReleaseDispatch();

    m_wdInlineShapes.ReleaseDispatch();

    //m_wdTb.ReleaseDispatch();

    m_wdRange.ReleaseDispatch();

    m_wdSel.ReleaseDispatch();

    //m_wdFt.ReleaseDispatch();

    m_wdDoc.ReleaseDispatch();

    m_wdDocs.ReleaseDispatch();

    m_wdApp.ReleaseDispatch();

}

//操作

BOOL CWordOffice::CreateApp()

{

    if (FALSE == m_wdApp.CreateDispatch("Word.Application"))

     {

        AfxMessageBox("Application创建失败,请确保安装了word 2000或以上版本!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    return TRUE;

}

BOOL CWordOffice::CreateDocuments()

{

    if (FALSE == CreateApp()) 

     {

        return FALSE;

    }

    m_wdDocs.AttachDispatch(m_wdApp.GetDocuments());

    if (!m_wdDocs.m_lpDispatch) 

     {

        AfxMessageBox("Documents创建失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    return TRUE;

}

BOOL CWordOffice::CreateDocument()

{

    if (!m_wdDocs.m_lpDispatch) 

     {

        AfxMessageBox("Documents为空!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    COleVariant varTrue(short(1),VT_BOOL),vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    CComVariant Template(_T(""));    //没有使用WORD的文档模板

    CComVariant NewTemplate(false),DocumentType(0),Visible;

    m_wdDocs.Add(&Template,&NewTemplate,&DocumentType,&Visible);    

    //得到document变量

    m_wdDoc = m_wdApp.GetActiveDocument();

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到selection变量

    m_wdSel = m_wdApp.GetSelection();

    if (!m_wdSel.m_lpDispatch) 

     {

        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到Range变量

    m_wdRange = m_wdDoc.Range(vOptional,vOptional);

    if(!m_wdRange.m_lpDispatch)

     {

        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    return TRUE;

}

BOOL CWordOffice::Create()

{

    if (FALSE == CreateDocuments()) 

     {

        return FALSE;

    }

    return CreateDocument();

}

void CWordOffice::ShowApp()

{

    m_wdApp.SetVisible(TRUE);

}

void CWordOffice::HideApp()

{

    m_wdApp.SetVisible(FALSE);

}

BOOL CWordOffice::OpenDocument(CString fileName)

{

    if (!m_wdDocs.m_lpDispatch) 

     {

        AfxMessageBox("Documents为空!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR),

                vZ((short)0);

    COleVariant     vFileName(_T(fileName));

    

    //得到document变量

    m_wdDoc.AttachDispatch(m_wdDocs.Open(

                                vFileName,        // FileName

                                vTrue,            // Confirm Conversion.

                                vFalse,            // ReadOnly.

                                vFalse,            // AddToRecentFiles.

                                vOptional,        // PasswordDocument.

                                vOptional,        // PasswordTemplate.

                                vOptional,        // Revert.

                                vOptional,        // WritePasswordDocument.

                                vOptional,        // WritePasswordTemplate.

                                vOptional,        // Format. // Last argument for Word 97

                                vOptional,        // Encoding // New for Word 2000/2002

                                vOptional        // Visible

                                /**//*如下4个是word2003需要的参数。本版本是word2000。

                                //vOptional,    // OpenAndRepair

                                //vZ,            // DocumentDirection wdDocumentDirection LeftToRight

                                //vOptional,    // NoEncodingDialog

                                //vOptional

                                */

                                )                // Close Open parameters

                            );                    // Close AttachDispatch

    

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到selection变量

    m_wdSel = m_wdApp.GetSelection();

    if (!m_wdSel.m_lpDispatch) 

     {

        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到全部DOC的Range变量

    m_wdRange = m_wdDoc.Range(vOptional,vOptional);

    if(!m_wdRange.m_lpDispatch)

     {

        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    return TRUE;

}

BOOL CWordOffice::Open(CString fileName)

{

    if (FALSE == CreateDocuments()) 

     {

        return FALSE;

    }

    return OpenDocument(fileName);

}

BOOL CWordOffice::SetActiveDocument(short i)

{

    COleVariant     vIndex(_T(i)),vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    m_wdDoc.AttachDispatch(m_wdDocs.Item(vIndex));

    m_wdDoc.Activate();

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到selection变量

    m_wdSel = m_wdApp.GetSelection();

    if (!m_wdSel.m_lpDispatch) 

     {

        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到全部DOC的Range变量

    m_wdRange = m_wdDoc.Range(vOptional,vOptional);

    if(!m_wdRange.m_lpDispatch)

     {

        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    HideApp();

    return TRUE;

}

BOOL CWordOffice::SaveDocument()

{

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    m_wdDoc.Save();

    return TRUE;

}

BOOL CWordOffice::SaveDocumentAs(CString fileName)

{

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    COleVariant vFileName(_T(fileName));

    m_wdDoc.SaveAs(

                vFileName,    //VARIANT* FileName

                vOptional,    //VARIANT* FileFormat

                vOptional,    //VARIANT* LockComments

                vOptional,    //VARIANT* Password

                vOptional,    //VARIANT* AddToRecentFiles

                vOptional,    //VARIANT* WritePassword

                vOptional,    //VARIANT* ReadOnlyRecommended

                vOptional,    //VARIANT* EmbedTrueTypeFonts

                vOptional,    //VARIANT* SaveNativePictureFormat

                vOptional,    //VARIANT* SaveFormsData

                vOptional    //VARIANT* SaveAsAOCELetter

                );

    return    TRUE;

}

BOOL CWordOffice::CloseDocument()

{

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    m_wdDoc.Close(vFalse,    // SaveChanges.

             vTrue,            // OriginalFormat.

             vFalse            // RouteDocument.

             );

    m_wdDoc.AttachDispatch(m_wdApp.GetActiveDocument());

    if (!m_wdDoc.m_lpDispatch) 

     {

        AfxMessageBox("Document获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到selection变量

    m_wdSel = m_wdApp.GetSelection();

    if (!m_wdSel.m_lpDispatch) 

     {

        AfxMessageBox("Select获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    //得到全部DOC的Range变量

    m_wdRange = m_wdDoc.Range(vOptional,vOptional);

    if(!m_wdRange.m_lpDispatch)

     {

        AfxMessageBox("Range获取失败!", MB_OK|MB_ICONWARNING);

        return FALSE;

    }

    return TRUE;

}

void CWordOffice::CloseApp()

{

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    m_wdDoc.Save();

    m_wdApp.Quit(vFalse,    // SaveChanges.

             vTrue,            // OriginalFormat.

             vFalse            // RouteDocument.

             );

    //释放内存申请资源

    m_wdInlineShape.ReleaseDispatch();

    m_wdInlineShapes.ReleaseDispatch();

    //m_wdTb.ReleaseDispatch();

    m_wdRange.ReleaseDispatch();

    m_wdSel.ReleaseDispatch();

    //m_wdFt.ReleaseDispatch();

    m_wdDoc.ReleaseDispatch();

    m_wdDocs.ReleaseDispatch();

    m_wdApp.ReleaseDispatch();

}

void CWordOffice::WriteText(CString szText)

{

    m_wdSel.TypeText(szText);

}

void CWordOffice::WriteNewLineText(CString szText, int nLineCount /**//* = 1 */)

{

    int i;

    if (nLineCount <= 0)

     {

        nLineCount = 0;

    }

    for (i = 0; i < nLineCount; i++)

     {

        m_wdSel.TypeParagraph();

    }

    WriteText(szText);

}

void CWordOffice::WriteEndLine(CString szText)

{

    m_wdRange.InsertAfter(szText);

}

void CWordOffice::WholeStory()

{

    m_wdRange.WholeStory();

}

void CWordOffice::Copy()

{

    m_wdRange.CopyAsPicture();

}

void CWordOffice::InsertFile(CString fileName)

{

    COleVariant     vFileName(fileName),

                 vTrue((short)TRUE),

                 vFalse((short)FALSE),

                 vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR),

                 vNull(_T(""));

    /**//*

    void InsertFile(LPCTSTR FileName, VARIANT* Range, VARIANT* ConfirmConversions, VARIANT* Link, VARIANT* Attachment);

    */

    m_wdSel.InsertFile(

                    fileName,

                    vNull,

                    vFalse,

                    vFalse,

                    vFalse

                    );

}

void CWordOffice::InsertShapes(CString fileName)

{

    COleVariant vTrue((short)TRUE),    

                vFalse((short)FALSE),

                vOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    m_wdInlineShapes=m_wdSel.GetInlineShapes();

    m_wdInlineShape=m_wdInlineShapes.AddPicture(fileName,vFalse,vTrue,vOptional);

}

void CWordOffice::InsertHyperlink(CString fileLink)

{

    COleVariant     vAddress(_T(fileLink)),vSubAddress(_T(""));

    Range aRange = m_wdSel.GetRange();

    Hyperlinks vHyperlinks(aRange.GetHyperlinks());

    vHyperlinks.Add(

                    aRange,            //Object,必需。转换为超链接的文本或图形。

                    vAddress,         //Variant 类型,可选。指定的链接的地址。此地址可以是电子邮件地址、Internet 地址或文件名。请注意,Microsoft Word 不检查该地址的正确性。

                    vSubAddress,     //Variant 类型,可选。目标文件内的位置名,如书签、已命名的区域或幻灯片编号。

                    vAddress,         //Variant 类型,可选。当鼠标指针放在指定的超链接上时显示的可用作“屏幕提示”的文本。默认值为 Address。

                    vAddress,         //Variant 类型,可选。指定的超链接的显示文本。此参数的值将取代由 Anchor 指定的文本或图形。

                    vSubAddress        //Variant 类型,可选。要在其中打开指定的超链接的框架或窗口的名字。

                    ); 

    vHyperlinks.ReleaseDispatch();

}

 

上边的代码是主要的核心代码,有些代码没有进行优化,请各位批判的看!

测试部分代码如下:

需要在对话框中添加一个按钮,按钮的事件方法内添加如下代码:

 

COfficeProjectDlg::OnButton1()

{

AfxEnableControlContainer();   

       AfxOleInit();

       CWordOffice wd;

       wd.CreateDocuments();

wd.OpenDocument("d:\\a.doc");

wd.ShowApp(); //显示word

}

其他方法就不一一帖出测试方法了。可以自己根据方法说明做测试。

  评论这张
 
阅读(1312)| 评论(0)

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018