ASPNET中数据库数据导入Excel并打印.doc
上传人:sy****28 上传时间:2024-09-14 格式:DOC 页数:5 大小:27KB 金币:16 举报 版权申诉
预览加载中,请您耐心等待几秒...

ASPNET中数据库数据导入Excel并打印.doc

ASPNET中数据库数据导入Excel并打印.doc

预览

在线预览结束,喜欢就下载吧,查找使用更方便

16 金币

下载此文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

ASP.NET中数据库数据导入Excel并打印1、直接利用IE的打印功能。一般来说,这种方法可以做些扩展,而不是单单的调用javascript:print()这样简单,比如,可以使用如下代码:<OBJECTid=WebBrowserclassid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2height=0width=0></OBJECT><inputtype=buttonvalue=打印onclick=document.all.WebBrowser.ExecWB(6,1)><inputtype=buttonvalue=直接打印onclick=document.all.WebBrowser.ExecWB(6,6)><inputtype=buttonvalue=页面设置onclick=document.all.WebBrowser.ExecWB(8,1)><inputtype=buttonvalue=打印预览onclick=document.all.WebBrowser.ExecWB(7,1)>这种方法可以适用于简单的数据打印,对系统要求不高,但不足之处在于可以控制的能力比较差,比如处理分页等问题。2、利用水晶报表或其他第三方工具,如微软的Reportingservice。水晶报表或其他第三方控件的打印,一般是导出到Excel,WORD,PDF等再进行打印的,效果比较好,但编程比较复杂,控制起来也不大方便,而且这些工具都是要收费的。3、将数据库的数据或要打印的内容导出到Excel,Word中去打印。使用这种方法,可以在服务端或者客户端进行。在服务端使用的话,要求服务端要安装Word,Excel,在客户端使用的话,要求客户端在IE的安全设置上有一定要求。使用这种方法,可适应性比较强,控制较好。本文将以在ASP.NET中使用Excel为例子,介绍如何将数据导出到Excel的几种方法。首先,先介绍在服务端使用Excel的方法。要在服务器端使用Excel,必须要求服务器端安装Excel,并且要求一定的访问权限。比如,需要添加<identityimpersonate="true"/>到web.config中。在本文中,要给予WEB目录可写的权限。接下来,使用VS.NET2003新建一个VB.NET的工程,并添加引用。由于我们要使用的是Excel,所以添加一个关于COM的应用,这里添加的是MicrosoftExcelObjectLibrary,之后,添加的代码如下:ImportsSystem.Runtime.InteropServices.MarshalImportsOfficePrivateSubPage_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load''''以COM方式处理ExcelDimoExcelAsNewExcel.ApplicationDimoBooksAsExcel.Workbooks,oBookAsExcel.WorkbookDimoSheetsAsExcel.Sheets,oSheetAsExcel.WorksheetDimoCellsAsExcel.RangeDimsFileAsString,sTemplateAsString''''定义一个datatableDimdtAsDataTable=CType(Application.Item("MyDataTable"),DataTable)sFile=Server.MapPath(Request.ApplicationPath)&"\MyExcel.xls"''''定义模版文件sTemplate=Server.MapPath(Request.ApplicationPath)&"\MyTemplate.xls"oExcel.Visible=FalseoExcel.DisplayAlerts=False''''定义一个新的工作簿oBooks=oExcel.WorkbooksoBooks.Open(Server.MapPath(Request.ApplicationPath)&"\MyTemplate.xls")oBook=oBooks.Item(1)oSheets=oBook.WorksheetsoSheet=CType(oSheets.Item(1),Excel.Worksheet)''''命名该sheetoSheet.Name="FirstSheet"oCells=oSheet.Cells''''调用dumpdata过程,将数据导