zoukankan      html  css  js  c++  java
  • c#操作word模板插入文字、图片及表格

    1.建立word模板文件 person.dot
    用书签 标示相关字段的填充位置

    2.建立web应用程序 加入Microsoft.Office.Interop.Word引用
    具体添加引用请参看
    http://www.microsoft.com/china/msdn/library/office/office/OfficePrIntopAssFAQ.mspx?mfr=true

    3.相关示例代码

    protected void CreateReport_Click(object sender, EventArgs e)
            {
                Microsoft.Office.Interop.Word.Application appWord = null;//应用程序
                Microsoft.Office.Interop.Word.DocumentClass doc = null;//文档
                try
                {
                    appWord = new Microsoft.Office.Interop.Word.Application();
                    appWord.Visible = false;
                    object objTrue = true;
                    object objFalse = false;
                    object objTemplate = Server.MapPath("person.dot");//模板路径
                    object objDocType = WdDocumentType.wdTypeDocument;
                    doc = (DocumentClass)appWord.Documents.Add(ref objTemplate, ref objFalse, ref objDocType,ref objTrue);
                    //第一步生成word文档
                    //定义书签变量
                    object obDD_Name = "bm_Name";//姓 名
                    object obDD_Sex = "bm_Sex";//性 别
                    object obDD_Birthday = "bm_Birthday"; //出生年月
                    object obpic="pic";
                    object obtable = "obtable";
                    object Nothing = System.Reflection.Missing.Value;
                    //InlineShape shape = appWord.Selection.InlineShapes.AddPicture(@"F:\Picture\_DSC1602.JPG", ref Nothing, ref Nothing, ref Nothing);
                    //第二步 读取数据,填充数据集
                    System.Data.DataTable dt = new DataTable();
                    dt.Columns.Add("p_Name");
                    dt.Columns.Add("p_Sex");
                    dt.Columns.Add("p_Birthday");
                    DataRow dr = dt.NewRow();
                    dr["p_Name"] = "张三";
                    dr["p_Sex"] = "男";
                    dr["p_Birthday"] = "1980-01-01";
                    dt.Rows.Add(dr);

                    //第三步 给书签赋值
                    //给书签赋值
                    doc.Bookmarks.get_Item(ref obDD_Name).Range.Text = dt.Rows[0]["p_Name"].ToString(); //姓 名
                    doc.Bookmarks.get_Item(ref obDD_Sex).Range.Text = dt.Rows[0]["p_Sex"].ToString();//性 别
                    doc.Bookmarks.get_Item(ref obDD_Birthday).Range.Text = dt.Rows[0]["p_Birthday"].ToString();//年龄
                    doc.Bookmarks.get_Item(ref obpic).Range.InlineShapes.AddPicture(@"F:\Picture\_DSC1602.JPG", ref Nothing, ref Nothing, ref Nothing);

                   
                    //文档中插入表格
                    //doc.Bookmarks.get_Item(ref obtable).Range.Tables.Add(doc.Bookmarks.get_Item(ref obtable).Range, 12, 3, ref Nothing, ref Nothing);
                    Microsoft.Office.Interop.Word.Table newTable = doc.Tables.Add(doc.Bookmarks.get_Item(ref obtable).Range, 12, 3, ref Nothing, ref Nothing);
                    newTable.Borders.OutsideLineStyle = WdLineStyle.wdLineStyleSingle;
                    newTable.Borders.InsideLineStyle = WdLineStyle.wdLineStyleSingle;
                    //给文档的最后一行再添加内容
                    doc.Paragraphs.Last.Range.Text = "";
                   
                    //第四步 生成word
                    object filename = Server.MapPath("~") + "http://www.cnblogs.com/chenbg2001/admin/file://bg//" + dt.Rows[0]["p_Name"].ToString() + ".doc";
                    object miss = System.Reflection.Missing.Value;
                    doc.SaveAs(ref filename, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss, ref miss);
                    object missingValue = Type.Missing;
                    object doNotSaveChanges = WdSaveOptions.wdDoNotSaveChanges;
                    doc.Close(ref doNotSaveChanges, ref missingValue, ref missingValue);
                    appWord.Application.Quit(ref miss, ref miss, ref miss);
                    doc = null;
                    appWord = null;

                }
                catch (System.Exception ex)
                {
                    //捕捉异常,如果出现异常则清空实例,退出word,同时释放资源
                    string aa = ex.ToString();
                    object miss = System.Reflection.Missing.Value;
                    object missingValue = Type.Missing;
                    object doNotSaveChanges = WdSaveOptions.wdDoNotSaveChanges;
                    doc.Close(ref doNotSaveChanges, ref missingValue, ref missingValue);
                    appWord.Application.Quit(ref miss, ref miss, ref miss);
                    doc = null;
                    appWord = null;
                }
            }

    -----
    以上代码在运行时 如遭遇80070005错误

    解决方法一:
    控制面板-》管理工具-》组件服务-》计算机-》我的电脑-》DCom配置-》找到Microsoft Word文档
    之后
    单击属性打开此应用程序的属性对话框。
    2. 单击标识选项卡,然后选择交互式用户。
    3.单击"安全"选项卡,分别在"启动和激活权限"和"访问权限"组中选中"自定义",然后
    自定义->编辑->添加ASP.NET账户和IUSER_计算机名
    4. 确保允许每个用户访问,然后单击确定。
    5. 单击确定关闭 DCOMCNFG。

    解决方法二:
    如果上述方法不能解决问题,就应该是权限问题,请尝试用下面的方法:
    在web.config中使用身份模拟,在<system.web>节中加入 <identity impersonate="true" userName="你的用户名

    " password="密码"/>
    </system.web>

    参考文档:http://wenku.baidu.com/view/fc8aa56fb84ae45c3b358c98.html

    附:图片的详细操作

    object filename = @"C:\Inetpub\wwwroot\TestWebApp\test.doc";//文件名
    Word.Application a = new Word.ApplicationClass();//建立一个Word程序对像
    object Nothing = System.Reflection.Missing.Value;//空值
    Word.Document b = a.Documents.Open(ref filename,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing,ref Nothing);//建立一个Word文档对像

    //其实这步就是执行了这个宏
    InlineShape shape = a.Selection.InlineShapes.AddPicture(@"C:\Documents and Settings\Administrator\桌面\2003121512223366481.jpg",ref Nothing,ref Nothing,ref Nothing);

    shape.Height = InchesToPoints(0.5)
    shape.Width = InchesToPoints(0.5)

    //Selection.InlineShapes.AddPicture FileName:= "C:\Documents and Settings\Administrator\桌面\2003121512223366481.bmp", LinkToFile:=False, SaveWithDocument:=True End Sub b.Save();//保存
    b.Close(ref Nothing,ref Nothing,ref Nothing);//关闭Word文档
    a.Quit(ref Nothing,ref Nothing,ref Nothing);//退出Word程序

  • 相关阅读:
    Ubuntu下成功安装台式机网卡realtek的rtl8188eu芯片驱动并实现AP功能
    背包问题九讲笔记_01背包(转)
    Ubuntu 12.04 LTS 中文输入法的安装 (转载)
    ubuntu扩展屏幕
    模拟————找规律
    数学——费马小定理、快速幂,组合数
    DP———1.最大子连续子序列和
    FOJ ——Problem 1759 Super A^B mod C
    POJ
    CSU 2136 ——湖南多校对抗赛 I
  • 原文地址:https://www.cnblogs.com/chenbg2001/p/2036625.html
Copyright © 2011-2022 走看看