数据按书签方式插入word例子

  1. 需要引用Microsoft.Office.Interop.Word


#region WordDoc

        public void WordDoc()
        {
            Microsoft.Office.Interop.Word.Application appWord = null;
            Microsoft.Office.Interop.Word.Document doc = null;
            try
            {
                appWord = new Microsoft.Office.Interop.Word.ApplicationClass();
                appWord.Visible = false;
                object objTrue = true;
                object objFalse = false;
                object objTemplate = @"G:"123.doc";
                //System.Web.HttpContext.Current.Server.MapPath(@"G:"123.doc");//模板路径
                object objDocType = Microsoft.Office.Interop.Word.WdDocumentType.wdTypeDocument;
                doc = appWord.Documents.Add(ref objTemplate, ref objFalse, ref objDocType, ref objTrue);
                //第一步生成word文档
                //定义书签变量
                object obDD_Name = "DD_Name";//姓 名
                object obDD_Sex = "DD_Sex";//性 别
                object obDD_Age = "DD_Age";//年龄
                object obDD_Birthday = "DD_Birthday"; //出生年月
                object obDD_Nation = "DD_Nation"; //民 族
                object obDD_Native = "DD_Native"; //籍 贯
                //...
                //第二步 读取数据,填充数据集
                //SqlDataReader dr = null;//读取出来的数据集
                //第三步 给书签赋值
                //给书签赋值
                object missing = System.Reflection.Missing.Value;
                object BookMarkName = "obDD_Name";
                object what = Microsoft.Office.Interop.Word.WdGoToItem.wdGoToBookmark;
                doc.ActiveWindow.Selection.GoTo(ref what, ref missing, ref missing, ref BookMarkName);
                doc.ActiveWindow.Selection.TypeText("朱一鸣");
                doc.ActiveWindow.Selection.TypeParagraph();
                //doc.Bookmarks.get_Item(ref i).Range.Text = "朱一鸣"; //姓 名
                //doc.Bookmarks.get_Item(ref j).Range.Text = "男";//性 别
                //doc.Bookmarks.get_Item(ref k).Range.Text = "23";//年龄
                // ....
                //第四步 生成word
                object filename = @"G:"zym" + DateTime.Now.ToString("yyyyMMddHHmmssffff") + ".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 = Microsoft.Office.Interop.Word.WdSaveOptions.wdDoNotSaveChanges;
                doc.Close(ref doNotSaveChanges, ref missingValue, ref missingValue);
                appWord.Application.Quit(ref miss, ref miss, ref miss);
                doc = null;
                appWord = null;

                Response.Buffer = true;
                Response.Clear();
                Response.ClearContent();
                Response.ClearHeaders();
                Response.ContentType = "application/msword";

                Response.Charset = "utf-8";
                Response.ContentEncoding = System.Text.Encoding.GetEncoding("utf-8");
                System.IO.FileInfo file = new System.IO.FileInfo(filename.ToString());

                Response.AddHeader("Content-Disposition", "attachment;filename=" + HttpUtility.UrlEncode(file.Name, System.Text.Encoding.UTF8) + "");
                //attachment --- 作为附件下载
                //inline --- 在线打开
                //filename如过是中文,则可以用HttpUtility.UrlEncode(fileName,System.Text.Encoding.UTF8)
                //进行进行编码,以解决文件名乱码的问题


                Response.WriteFile(file.FullName);
                Response.Flush();
                Response.Close();
                File.Delete(filename.ToString());
            }
            catch (System.Exception e)
            {
                //捕捉异常,如果出现异常则清空实例,退出word,同时释放资源
                string aa = e.ToString();
                object miss = System.Reflection.Missing.Value;
                object missingValue = Type.Missing;
                object doNotSaveChanges = Microsoft.Office.Interop.Word.WdSaveOptions.wdDoNotSaveChanges;
                doc.Close(ref doNotSaveChanges, ref missingValue, ref missingValue);
                appWord.Application.Quit(ref miss, ref miss, ref miss);
                doc = null;
                appWord = null;
            }

        }
        #endregion
posted @ 2008-10-08 21:49  华丽的空白  阅读(700)  评论(0编辑  收藏  举报