关于WORD报表的自动生成（用C#）

这块内容建议你用水晶报表，可以导出成为

WROD

EXCEL

PDF等多种格式粗租的，如果你要导出成为WORD的。。。要写的代码太多了，如果个人用的话还是用水晶报表方便点，只不过谈凳册报表的格式有点单一，不过功能含宏上差不多也够用了。。

将用TurboC编写的C源程序生成Word文档:

找到你的源程序，在源程序（*.c）的文件上单击右键，选择打开方式，在打开方式里纯宏，选择记事本。然后把记事本里的文件全选，复判亩制，再新建一个Word文档，打开，在Word里右键选择粘贴，关闭Word，在提示对话框中选择保存。就好了。

将Word文档形式的C源程序导入TurboC中：

把要复制的源文件选中，复制到记事本里，然后

选择文件，另存为，输入你的文件名后面加上.c，选择掘裤森所有文件，保存。就OK了。

ASP.NET利用dot模板生成Word文档代码,假定有一个模板文运仿察件位于网站Mywebsite/templates/a.dot,现在需要利用Word.ApplicationClass和Word.Document类来生成一个word文档。关键代码如下：

//初始化生成word文档需要的信息

Word.Application appWord =null

Word.Document doc = null

try

{

appWord = new Word.ApplicationClass()

appWord.Visible = false

object objTrue = true

object objFalse = false

object objTemplate = Server.MapPath(@"templates\a.dot")//模板路径

object objDocType = 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 = XXXXX//读取出来的数据集

//第三步 给书签旁茄赋值

//给书签赋值

doc.Bookmarks.get_Item(ref obDD_Name).Range.Text = dr["appliername"].ToString()//姓 名

doc.Bookmarks.get_Item(ref obDD_Sex).Range.Text = getCodeFullNameStd("性别", dr["Sex"].ToString())//性 别

doc.Bookmarks.get_Item(ref obDD_Age).Range.Text = Convert.ToString(DateTime.Now.Year - ((DateTime)dr["Birthday"]).Year)//年龄

.

//第四步 生成word

object filename = Server.MapPath("file") + "\\" + "XXXXXXXXXX情况表" +".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 = Word.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 e)

{

//捕捉异常，如果出现异常则清空实例，退出word,同时释放资源

string aa = e.ToString()

object miss = System.Reflection.Missing.Value

object missingValue = Type.Missing

object doNotSaveChanges = Word.WdSaveOptions.wdDoNotSaveChanges

doc.Close(ref doNotSaveChanges, ref missingValue, ref missingValue)

appWord.Application.Quit(ref miss, ref miss, ref miss)

doc = null

appWord = null

}

---