【asp源码栏目提醒】:网学会员在asp源码频道为大家收集整理了“ASP NET利用dot模板生成Word文档代码_LinZi_ - 技术总结“提供大家参考,希望对大家有所帮助!
ASP.NET利用dot模板生成Word文档代码假定有一个模板文件位于网站Mywebsite/templates/a.dot现在需要利用Word.ApplicationClass和Word.Document类来生成一个word文档。
关键代码如下 1 //初始化生成word文档需要的信息 2 Word.Application appWord null 3 Word.Document doc null 4 try 5 6 appWord new Word.ApplicationClass 7 appWord.Visible false 8 object objTrue true 9 object objFalse false 10 object objTemplate Server.MapPathtemplatesa.dot//模板路径 11 object objDocType Word.WdDocumentType.wdTypeDocument 12 doc appWord.Documents.Addref objTemplate ref objFalse ref objDocType ref objTrue 13 //第一步生成word文档 14 //定义书签变量 15 object obDD_Name DD_Name//姓 名 16 object obDD_Sex DD_Sex//性 别 17 object obDD_Age DD_Age//年龄 18 object obDD_Birthday DD_Birthday //出生年月 19 object obDD_Nation DD_Nation //民 族 20 object obDD_Native DD_Native //籍 贯 21 22 //第二步 读取数据填充数据集 23 SqlDataReader dr XXXXX//读取出来的数据集 24 //第三步 给书签赋值 25 //给书签赋值 26 doc.Bookmarks.get_Itemref obDD_Name.Range.Text drappliername.ToString //姓 名 27 doc.Bookmarks.get_Itemref obDD_Sex.Range.Text getCodeFullNameStd性别 drSex.ToString//性 别 28 doc.Bookmarks.get_Itemref obDD_Age.Range.Text Convert.ToStringDateTime.Now.Year - DateTimedrBirthday.Year//年龄 29 . 30 //第四步 生成word 31 object filename Server.MapPathfile 接收毕业生情况表 .doc 32 object miss System.Reflection.Missing.Value 33 doc.SaveAsref 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 34 object missingValue Type.Missing 35 object doNotSaveChanges Word.WdSaveOptions.wdDoNotSaveChanges 36 doc.Closeref doNotSaveChanges ref missingValue ref missingValue 37 appWord.Application.Quitref miss ref miss ref miss 38 doc null 39 appWord null 40 41 catch System.Exception e 42 43 //捕捉异常如果出现异常则清空实例退出word同时释放资源 44 string aa e.ToString 45 object miss System.Reflection.Missing.Value 46 object missingValue Type.Missing 47 object doNotSaveChanges Word.WdSaveOptions.wdDoNotSaveChanges 48 doc.Closeref doNotSaveChanges ref missingValue ref missingValue 49 appWord.Application.Quitref miss ref miss ref miss 50 doc null 51 appWord null 52