richTextBox实现带格式word文档的打开、保存、另存为

(2012-02-05 21:30:49)转载▼标签: crichtextboxc保存wordit 分类: 编程 


早在网上查找richTextBox打开保存带格式的word文档的方法,但是在网上只找到了保存成不带格式的(纯文本)的word文档的代码。今天对这些代码进行修改,终于实现了我想要的功能。

 

我这里其实是用剪切板来实现带格式文档的打开和保存的。话不多说,下面是代码:

 

//用richTextBox打开带格式的word文档。

//先打开word文档,全选其中的内容并保存的剪切板中,最后在richTextBox中粘贴数据,并关闭文档

public void OpenWord(string fileName)

{

    Word.ApplicationClass app = new Word.ApplicationClass();

    Word.Document doc = null;

    object missing = System.Reflection.Missing.Value;

    object File = fileName;

    object readOnly = false;

    object isVisible = true;

    try

    {

        doc = app.Documents.Open(ref File, ref missing, ref readOnly,

         ref missing, ref missing, ref missing, ref missing, ref missing,

         ref missing, ref missing, ref missing, ref isVisible, ref missing,

         ref missing, ref missing, ref missing);

 

        doc.ActiveWindow.Selection.WholeStory();//全选word文档中的数据

        doc.ActiveWindow.Selection.Copy();//复制数据到剪切板

        richTextBox1.Paste();//richTextBox粘贴数据

        //richTextBox1.Text = doc.Content.Text;//显示无格式数据

    }

    finally

    {

        if (doc != null)

        {

            doc.Close(ref missing, ref missing, ref missing);

            doc = null;

        }

 

        if (app != null)

        {

            app.Quit(ref missing, ref missing, ref missing);

            app = null;

        }

    }

}

 

//保存richTextBox数据到已经存在的word文档中。

//先打开word文档,全选word文档中的数据,然后全选richTextBox中的数据并复制,粘贴到word文档中,最后保存word文档,并关闭文档

public void SaveWord(string fileName)

{

    Word.ApplicationClass app = new Word.ApplicationClass();

    Word.Document doc = null;

    object missing = System.Reflection.Missing.Value;

    object File = fileName;

    object readOnly = false;

    object isVisible = true;

    try

    {

        doc = app.Documents.Open(ref File, ref missing, ref readOnly,

         ref missing, ref missing, ref missing, ref missing, ref missing,

         ref missing, ref missing, ref missing, ref isVisible, ref missing,

         ref missing, ref missing, ref missing);

 

        doc.ActiveWindow.Selection.WholeStory();//全选

        richTextBox1.SelectAll();

        Clipboard.SetData(DataFormats.Rtf, richTextBox1.SelectedRtf);//复制RTF数据到剪贴板

        doc.ActiveWindow.Selection.Paste();

        //doc.Paragraphs.Last.Range.Text = richTextBox1.Text;//word文档赋值数据,不带格式

        doc.Save();

    }

    finally

    {

        if (doc != null)

        {

            doc.Close(ref missing, ref missing, ref missing);

            doc = null;

        }

 

        if (app != null)

        {

            app.Quit(ref missing, ref missing, ref missing);

            app = null;

        }

    }

}

 

//将richTextBox带格式的文本另存为word文档

//先创建一个word文档,全选word文档中的数据,然后全选richTextBox中的数据并复制,粘贴到word文档中,最后保存word文档,并关闭文档

public void SaveAsWord(string fileName)

{

    Word.ApplicationClass app = new Word.ApplicationClass();

    Word.Document doc = null;

    object missing = System.Reflection.Missing.Value;

    object File = fileName;

    try

    {

        doc = app.Documents.Add(ref missing, ref missing, ref missing, ref missing);

 

        doc.ActiveWindow.Selection.WholeStory();//全选

        richTextBox1.SelectAll();

        Clipboard.SetData(DataFormats.Rtf, richTextBox1.SelectedRtf);//复制RTF数据到剪贴板

        doc.ActiveWindow.Selection.Paste();

 

        doc.SaveAs(ref File, ref missing, ref missing,

            ref missing, ref missing, ref missing,

            ref missing, ref missing, ref missing,

            ref missing, ref missing, ref missing,

            ref missing, ref missing, ref missing,

            ref missing);

    }

    finally

    {

        if (doc != null)

        {

            doc.Close(ref missing, ref missing, ref missing);

            doc = null;

        }

 

        if (app != null)

        {

            app.Quit(ref missing, ref missing, ref missing);

            app = null;

        }

    }

}

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值