使用HTML文件作为中转生成WORD文档（转）

批量生成Word 要是一个个的填写，工作量还真是很大，而且以后每年都要这样填写，实在是太麻烦了。

好了，这应该是一个很简单的问题，假设数据都准备好了（事实上这部分也是一团糟，尽管比较简单），我们可以考虑使用报表设计器做一个报表，但是其中报表的细节比较麻烦（比如答辩委员会的成员可能只有7个，而不是图示的8个，一般的报表设计器不是很好处理）。再考虑直接用程序生成WORD文档吧，嗯，WORD的对象模型可以参考，但生成这种格式还是比较麻烦的，我们可以考虑一种变通的方法——使用HTML文件作为中转：
先使用Dreamweaver等HTML生成工具，生成上图所示的表格，保存为一个html文件。用WORD打开这个html文件，看一下效果（使用“页面”视图），除了表格线好像太粗了，其它的CSS样式应用效果还是很好的。现在，我们就可以考虑像ASP时代开发的时候使用代码循环为每一个学生那样生成这个表格了。另外，还有一个需求需要满足，就是每个学生的审核表应该占一页，也就是说每次循环都应该插入一个分页符。HTML文件中没有分页的概念，我们可以先在WORD中插入一个分页符，然后将这个WORD文档另存为HTML文件，然后查看其源文件，可以看到，分页符是这样的：

[运行代码] [复制到剪贴板] [ ± ]

CODE:

至于细线表格，当然可以在CSS样式中加以定义，也可以按照上面分页符的方式查看其源代码：

[运行代码] [复制到剪贴板] [ ± ]

CODE:

OK，下面的代码就可以为所有学生一次生成审核表了：

[运行代码] [复制到剪贴板] [ ± ]

CODE:

string strFilePath = Application.StartupPath + @"\wordfile.doc";
2
3 System.IO.StreamWriter sw = new System.IO.StreamWriter(strFilePath, false, System.Text.Encoding.GetEncoding("gb2312"));
4 sw.WriteLine("<html><head><meta http-equiv='Content-Type' content='application/msword; charset=gb2312'><title>学位论文答辩委员会成员审核表</title>");
5 sw.WriteLine("<style type='text/css'> </style>");
6 sw.WriteLine("</head>");
7 sw.WriteLine("<body>");
8
9 System.Data.OleDb.OleDbDataAdapter odda = new System.Data.OleDb.OleDbDataAdapter("SELECT 研究生.编号, 研究生.姓名, 研究生.学科专业, 研究生.导师, 研究生.论文题目 FROM 研究生 ORDER BY 研究生.编号", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + System.Windows.Forms.Application.StartupPath + @"\database.mdb");
10
11 System.Data.DataSet dsStudent = new DataSet();
12
13 odda.Fill(dsStudent);
14
15 for (int i = 0; i < dsStudent.Tables[0].Rows.Count; i++)
16 {
17
18 sw.WriteLine("<div align='center' class='STYLE1'> 硕 士学位论文答辩委员会成员审核表</div>");
19
20 sw.WriteLine("<table width='610' border='1' cellpadding='0' cellspacing='0' bordercolor='#000000' style='border-collapse:collapse;border:none;mso-border-alt:solid windowtext .5pt; mso-yfti-tbllook:480;mso-padding-alt:0cm 5.4pt 0cm 5.4pt;mso-border-insideh:.5pt solid windowtext;mso-border-insidev:.5pt solid windowtext'>");
21
22 sw.WriteLine("<tr><td width='68' align='center' valign='middle' class='STYLE2' height='50pt'>研究生 姓名</td>");
23 sw.WriteLine("<td width='93' align='center' valign='middle' class='STYLE2' height='50pt'>" + dsStudent.Tables[0].Rows[i]["姓名"].ToString() + "</td>");
24 sw.WriteLine("<td width='68' align='center' valign='middle' class='STYLE2' height='50pt'>专业</td>");
25 sw.WriteLine("<td colspan='3' align='center' valign='middle' class='STYLE2' height='50pt'>" + dsStudent.Tables[0].Rows[i]["学科专业"].ToString() + "</td></tr>");
26
27
28 sw.WriteLine("<tr><td align='center' valign='middle' class='STYLE2' height='50pt'>导师 姓名</td>");
29 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='50pt'>" + dsStudent.Tables[0].Rows[i]["导师"].ToString() + "</td>");
30 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='50pt'>论文 题目</td>");
31 sw.WriteLine("<td colspan='3' align='center' valign='middle' class='STYLE2' height='50pt'>" + dsStudent.Tables[0].Rows[i]["论文题目"].ToString() + "</td></tr>");
32
33 sw.WriteLine("<tr><td rowspan='8' align='center' valign='middle' class='STYLE2'>答 辩 委 员 会 成 员</td>");
34 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>姓名</td>");
35 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>职称</td>");
36 sw.WriteLine("<td width='204' align='center' valign='middle' class='STYLE2' height='36'>工作单位</td>");
37 sw.WriteLine("<td width='100' align='center' valign='middle' class='STYLE2' height='36'>在委员会中 担任的职务</td>");
38 sw.WriteLine("<td width='63' align='center' valign='middle' class='STYLE2' height='36'>备注</td></tr>");
39
40 System.Data.OleDb.OleDbDataAdapter oddaT = new System.Data.OleDb.OleDbDataAdapter("SELECT 答辩老师小组.顺序, 答辩老师.姓名, 答辩老师.职称, 答辩老师.单位, 答辩老师小组.答辩职务, 答辩老师.备注 FROM 答辩老师 INNER JOIN (答辩老师小组 INNER JOIN (答辩小组 INNER JOIN 研究生小组 ON 答辩小组.编号 = 研究生小组.小组) ON 答辩老师小组.小组编号 = 答辩小组.编号) ON 答辩老师.编号 = 答辩老师小组.答辩老师编号 WHERE (((研究生小组.研究生)=" + dsStudent.Tables[0].Rows[i]["编号"].ToString() + ")) ORDER BY 答辩老师小组.顺序", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + System.Windows.Forms.Application.StartupPath + @"\database.mdb");
41
42 System.Data.DataSet dsTeacher = new DataSet();
43 oddaT.Fill(dsTeacher);
44
45 for (int j = 0; j < 7; j++)
46 {
47 if (j < dsTeacher.Tables[0].Rows.Count)
48 {
49 sw.WriteLine("<tr><td align='center' valign='middle' class='STYLE2' height='36'>" + dsTeacher.Tables[0].Rows[j]["姓名"].ToString() + "</td>");
50 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>" + dsTeacher.Tables[0].Rows[j]["职称"].ToString() + "</td>");
51 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>" + dsTeacher.Tables[0].Rows[j]["单位"].ToString() + "</td>");
52 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>" + dsTeacher.Tables[0].Rows[j]["答辩职务"].ToString() + "</td>");
53 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'>" + dsTeacher.Tables[0].Rows[j]["备注"].ToString() + "</td></tr>");
54 }
55 else
56 {
57 sw.WriteLine("<tr><td align='center' valign='middle' class='STYLE2' height='36'> </td>");
58 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'> </td>");
59 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'> </td>");
60 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'> </td>");
61 sw.WriteLine("<td align='center' valign='middle' class='STYLE2' height='36'> </td></tr>");
62 }
63 }
64
65 dsTeacher.Dispose();
66
67 sw.WriteLine("<tr><td align='center' valign='middle' class='STYLE2'>分学 科学 位评 定委 员会 意见</td>");
68 sw.WriteLine("<td colspan='5' class='STYLE2'> ");
69 sw.WriteLine(" 分委员会主席（签字） 2006年06月10日</td></tr>");
70
71 sw.WriteLine("<tr><td align='center' valign='middle' class='STYLE2'>校学 位评 定委 员会 审批 意见</td>");
72 sw.WriteLine("<td colspan='5' class='STYLE2'> ");
73 sw.WriteLine(" 2006年06月10日</td></tr></table>");
74
75 sw.WriteLine(" ");
76 }
77
78 dsStudent.Dispose();
79
80 sw.WriteLine("</body></html>");
81
82 sw.Close();
83
84 System.Diagnostics.Process.Start(strFilePath);

本文Tags： Html | word | 查看所有>>

- 提取HTML代码中文字的C#函数 (2007-6-20 16:53:00)

- 请问下asp.net生成html列表怎么操作呀 (2007-7-17 15:19:00)

- 自动识别HTML代码里的图片链接,并下载到服务器的指定目录源码 (2007-7-25 11:39:00)

- ASP.NET动态生成html页面 (2007-8-27 8:42:00)

- asp.net中嵌套Word 文档 (2007-12-4 11:22:00)

- 网上报名系统 (2008-2-9 23:57:00)

- 谁能提供在网页中嵌入Word直接进行在线编辑功能的知识和源码？ (2008-3-23 14:12:00)