Exce表格网

jsp里excel导出(asp导出到excel)

来源:www.0djx.com  时间:2023-01-12 16:35   点击:289  编辑:表格网  手机版

1. asp导出到excel

1/a.asp: response.contenttype="application/vnd.ms-excel"

保存然后再打开这个a.asp看发生了什么。2/从工具菜单的“数据>导入外部数据……这样的步骤,就可以下载这个网页的资料3、安装了OFFICE 2003版本后,在游览网页的时候点击右键,有一个 导出到MICROSOFT OFFICE EXCEL功能键

2. asp数据库与excel的导入导出

1、由dataset生成

复制代码代码如下:

public void CreateExcel(DataSet ds,string typeid,string FileName)

{

HttpResponse resp;

resp = Page.Response;

resp.ContentEncoding = System.Text.Encoding.GetEncoding("GB2312");

resp.AppendHeader("Content-Disposition", "attachment;filename=" + FileName);

string colHeaders= "", ls_item="";

int i=0;

//定义表对象与行对像,同时用DataSet对其值进行初始化

DataTable dt=ds.Tables[0];

DataRow[] myRow=dt.Select("");

// typeid=="1"时导出为EXCEL格式文件;typeid=="2"时导出为XML格式文件

if(typeid=="1")

{

//取得数据表各列标题,各标题之间以t分割,最后一个列标题后加回车符

for(i=0;i colHeaders+=dt.Columns[i].Caption.ToString()+"t";

colHeaders +=dt.Columns[i].Caption.ToString() +"n";

//向HTTP输出流中写入取得的数据信息

resp.Write(colHeaders);

//逐行处理数据

foreach(DataRow row in myRow)

{

//在当前行中,逐列获得数据,数据之间以t分割,结束时加回车符n

for(i=0;i ls_item +=row[i].ToString() + "t";

ls_item += row[i].ToString() +"n";

//当前行数据写入HTTP输出流,并且置空ls_item以便下行数据

resp.Write(ls_item);

ls_item="";

}

}

else

{

if(typeid=="2")

{

//从DataSet中直接导出XML数据并且写到HTTP输出流中

resp.Write(ds.GetXml());

}

}

//写缓冲区中的数据到HTTP头文件中

resp.End();

}

2、由datagrid生成

复制代码代码如下:

public void ToExcel(System.Web.UI.Control ctl)

{

HttpContext.Current.Response.AppendHeader("Content-Disposition","attachment;filename=Excel.xls");

HttpContext.Current.Response.Charset ="UTF-8";

HttpContext.Current.Response.ContentEncoding =System.Text.Encoding.Default;

HttpContext.Current.Response.ContentType ="application/ms-excel";//image/JPEG;text/HTML;image/GIF;vnd.ms-excel/msword

ctl.Page.EnableViewState =false;

System.IO.StringWriter tw = new System.IO.StringWriter() ;

System.Web.UI.HtmlTextWriter hw = new System.Web.UI.HtmlTextWriter (tw);

ctl.RenderControl(hw);

HttpContext.Current.Response.Write(tw.ToString());

HttpContext.Current.Response.End();

}

用法:ToExcel(datagrid1);

3、这个用dataview

复制代码代码如下:

public void OutputExcel(DataView dv,string str)

{

//

// TODO: 在此处添加构造函数逻辑

//

//dv为要输出到Excel的数据,str为标题名称

GC.Collect();

Application excel;// = new Application();

int rowIndex=4;

int colIndex=1;

_Workbook xBk;

_Worksheet xSt;

excel= new ApplicationClass();

xBk = excel.Workbooks.Add(true);

xSt = (_Worksheet)xBk.ActiveSheet;

//

//取得标题

//

foreach(DataColumn col in dv.Table.Columns)

{

colIndex++;

excel.Cells[4,colIndex] = col.ColumnName;

xSt.get_Range(excel.Cells[4,colIndex],excel.Cells[4,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置标题格式为居中对齐

}

//

//取得表格中的数据

//

foreach(DataRowView row in dv)

{

rowIndex ++;

colIndex = 1;

foreach(DataColumn col in dv.Table.Columns)

{

colIndex ++;

if(col.DataType == System.Type.GetType("System.DateTime"))

{

excel.Cells[rowIndex,colIndex] = (Convert.ToDateTime(row[col.ColumnName].ToString())).ToString("yyyy-MM-dd");

xSt.get_Range(excel.Cells[rowIndex,colIndex],excel.Cells[rowIndex,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置日期型的字段格式为居中对齐

}

else

if(col.DataType == System.Type.GetType("System.String"))

{

excel.Cells[rowIndex,colIndex] = "'"+row[col.ColumnName].ToString();

xSt.get_Range(excel.Cells[rowIndex,colIndex],excel.Cells[rowIndex,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置字符型的字段格式为居中对齐

}

else

{

excel.Cells[rowIndex,colIndex] = row[col.ColumnName].ToString();

}

}

}

//

//加载一个合计行

//

int rowSum = rowIndex + 1;

int colSum = 2;

excel.Cells[rowSum,2] = "合计";

xSt.get_Range(excel.Cells[rowSum,2],excel.Cells[rowSum,2]).HorizontalAlignment = XlHAlign.xlHAlignCenter;

//

//设置选中的部分的颜色

//

xSt.get_Range(excel.Cells[rowSum,colSum],excel.Cells[rowSum,colIndex]).Select();

xSt.get_Range(excel.Cells[rowSum,colSum],excel.Cells[rowSum,colIndex]).Interior.ColorIndex = 19;//设置为浅黄色,共计有56种

//

//取得整个报表的标题

//

excel.Cells[2,2] = str;

//

//设置整个报表的标题格式

//

xSt.get_Range(excel.Cells[2,2],excel.Cells[2,2]).Font.Bold = true;

xSt.get_Range(excel.Cells[2,2],excel.Cells[2,2]).Font.Size = 22;

//

//设置报表表格为最适应宽度

//

xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Select();

xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Columns.AutoFit();

//

//设置整个报表的标题为跨列居中

//

xSt.get_Range(excel.Cells[2,2],excel.Cells[2,colIndex]).Select();

xSt.get_Range(excel.Cells[2,2],excel.Cells[2,colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;

//

//绘制边框

//

xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Borders.LineStyle = 1;

xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,2]).Borders[XlBordersIndex.xlEdgeLeft].Weight = XlBorderWeight.xlThick;//设置左边线加粗

xSt.get_Range(excel.Cells[4,2],excel.Cells[4,colIndex]).Borders[XlBordersIndex.xlEdgeTop].Weight = XlBorderWeight.xlThick;//设置上边线加粗

xSt.get_Range(excel.Cells[4,colIndex],excel.Cells[rowSum,colIndex]).Borders[XlBordersIndex.xlEdgeRight].Weight = XlBorderWeight.xlThick;//设置右边线加粗

xSt.get_Range(excel.Cells[rowSum,2],excel.Cells[rowSum,colIndex]).Borders[XlBordersIndex.xlEdgeBottom].Weight = XlBorderWeight.xlThick;//设置下边线加粗

//

//显示效果

//

excel.Visible=true;

//xSt.Export(Server.MapPath(".")+"\"+this.xlfile.Text+".xls",SheetExportActionEnum.ssExportActionNone,Microsoft.Office.Interop.OWC.SheetExportFormat.ssExportHTML);

xBk.SaveCopyAs(Server.MapPath(".")+"\"+this.xlfile.Text+".xls");

ds = null;

xBk.Close(false, null,null);

excel.Quit();

System.Runtime.InteropServices.Marshal.ReleaseComObject(xBk);

System.Runtime.InteropServices.Marshal.ReleaseComObject(excel);

System.Runtime.InteropServices.Marshal.ReleaseComObject(xSt);

xBk = null;

excel = null;

xSt = null;

GC.Collect();

string path = Server.MapPath(this.xlfile.Text+".xls");

System.IO.FileInfo file = new System.IO.FileInfo(path);

Response.Clear();

Response.Charset="GB2312";

Response.ContentEncoding=System.Text.Encoding.UTF8;

// 添加头信息,为"文件下载/另存为"对话框指定默认文件名

Response.AddHeader("Content-Disposition", "attachment; filename=" + Server.UrlEncode(file.Name));

// 添加头信息,指定文件大小,让浏览器能够显示下载进度

Response.AddHeader("Content-Length", file.Length.ToString());

// 指定返回的是一个不能被客户端读取的流,必须被下载

Response.ContentType = "application/ms-excel";

// 把文件流发送到客户端

Response.WriteFile(file.FullName);

// 停止页面的执行

Response.End();

}

导入、导出EXCEL中的一些问题汇总

一、在项目中的添加引用:

  右击项目资源管理器的引用-->添加引用-->选择.NET选项卡-->选择Microsoft.Office.Interop.Excel-->确定;

  在选择时注意一下.NET组件的版本号,本例的12.0.0.0是Office2007的版本:

二、在项目中使用Microsoft.Office.Interop.Excel:

如果想使用Microsoft.Office.Interop.Excel,首先需要在项目中引用命名空间:

  using Microsoft.Office.Interop.Excel;

三、建立Excel.Application相关对象

复制代码代码如下:

//建立Application对象

Microsoft.Office.Interop.Excel.Application myExcel = new Application();

  //建立Workbooks对象

Workbooks myBooks = myExcel.Application.Workbooks;

//建立一个System.Reflection.Missing的object对象

object oMissing = System.Reflection.Missing.Value;

四、打开或新建Excel的book文件

  

复制代码代码如下:

//打开Excel文件,注意里的“ExccelFilePath”为Excel文件在服务器上的物理地址,包括文件名

  Workbook myBook = myBooks.Open(ExccelFilePath,oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing);

//新建Workseet对象,,此处为要操作的工作表 ,当前要操作的工作表的获取方法有两种:使用工作表的索引值或使用工作表的名称,名称默认为:“sheet1”/“Sheet2”等

Worksheet mySheet = (Worksheet)myBook.Worksheets[1];

//如果是新建EXCEL工作簿,需要 设置如下两行内容,以保证工作簿中有一个工作表,

Workbook workbook1 = excel1.Workbooks.Add(true);

Worksheet mySheet= (Worksheet)workbook1.Worksheets["sheet1"];

//设置EXCEL对象是否显示界面,默认为false不显示界面

myExcel.Visble=true;

五、一些比较重要的针对Excel的操作

1、获取Range对象

   ①、获取一个单元格的Range对象:

   

复制代码代码如下:

//选择第一行、第一列的单元的单元格为Range对象

Range r = (Excel.Range)mySheet.Cells[1, 1];

//选择多个连续的单元格为Range对象

   Range r=(Excel.Range)Range.get_Range("A1:F3")

②、给单元格赋值或取出单元格的值:

复制代码代码如下:

//已选择了Range对象的赋值:

   r.Text="中国";

//未选择Range对象的赋值:

mySheet.Cells[1,2].Text="中国";

//已选择了Range对象的取值:

   String strValue= r.Text;

//未选择Range对象的取值:

 String strValue= mySheet.Cells[1,2].Text;

③、给单元格设置边框

复制代码代码如下:

mySheet.Cells[2, 1].BorderAround(XlLineStyle.xlContinuous, XlBorderWeight.xlThin, XlColorIndex.xlColorIndexAutomatic, null);//画线

④、合并单元格

  

复制代码代码如下:

//合并单元格前先要将要合并的单元格选择为Range对象

Range r=Range.get_Range("A1:F3");

  //然后现设置合并单元格

r.MergeCells = true;

⑤、设置单元格的字体、字号、背景色等属性

   

复制代码代码如下:

mySheet.Cells[1, 1].Font.Name = "黑体";

mySheet.Cells[1, 1].Font.Size = 20;

mySheet.Rows["1:1"].RowHeight = 40;

    mySheet.Cells[1, 1].Interior.Color = Color.FromArgb(224, 224, 224);//设置颜色

⑥、删除一行:

   

复制代码代码如下:

//首先获取要删除的行的Range

    Microsoft.Office.Interop.Excel.Range range = (Microsoft.Office.Interop.Excel.Range)mySheet.Rows[sendedRow[1], Type.Missing];

   //注意删除行后删除后的行号被下面的行替换,如果逐行删除,请先从最大的行号往最小的行号删除

range.Delete(Microsoft.Office.Interop.Excel.XlDeleteShiftDirection.xlShiftUp);

  ⑦、获取有数据的行数

   

复制代码代码如下:

int rowsint = mySheet.UsedRange.Cells.Rows.Count;

六、EXCEL文件的保存与退出

1、EXCEL的保存与退出

复制代码代码如下:

myBook.Save();

myBooks.Close();

myExcel.Quit();

2、EXCEL指定文件保存

   

复制代码代码如下:

myBook.Close(true, FilePath +_file_Name, null);

七、释放EXCLE对象的资源与结束EXCEL 进程

   关于这方面内容有好多网友都在讲多种方法,经过本人实践,以下方面才能真正做到结束EXCEL的任务进程:

1、将所有以上对EXCEL的操作放到一个方法中,

2、在操作EXCEL后,即时将不使用对象一一释放并赋null值:

  

复制代码代码如下:

System.Runtime.InteropServices.Marshal.ReleaseComObject(mysheet);

  mysheet=null;

  System.Runtime.InteropServices.Marshal.ReleaseComObject(myBook);

  myBook=null;

  System.Runtime.InteropServices.Marshal.ReleaseComObject(myBooks);

  myBooks=null;

  System.Runtime.InteropServices.Marshal.ReleaseComObject(myExcel);

  myExcel=null;

3、再新建一个方法,并以该方法中执行上面新建的操作EXCEL方法,并在执行完操作EXCEL方法的后面添加GC.Collect():

复制代码代码如下:

//下面方法中OutPutEXCEL()方法是输出EXCEL文件的对EXCEL 操作的方法

private void killExcel()

{

  outPutEXCEL();

  GC.Collect();

  GC.WaitForPendingFinalizers();

}

    好多网友都在介绍使用GC.Collect()释放EXCEL占用的资源来结束EXCEL进行,如果将“GC.Collect();”与操作EXCEL的业务写在一个程序块中,“GC”是永远不能结束EXCEL进程的,在WEB应用程序中,这种现象是很可怕的事情。原因是GC不会清理本程序块中的垃圾内存的。

4、在业务事件中调用killEXCEL()方法:

复制代码代码如下:

protected void LinkButton3_Click(object sender, EventArgs e)

{

  //导出EXCEL

  killExcel();

}

八、一些权限的基本设置:

使用以上方法在开发环境中调试程序没有一点问题,等发布到服务器上后,程序还是不能正常运行,需要进行如下的权限设置:

.NET导出Excel遇到的80070005错误的解决方法:

检索 COM 类工厂中 CLSID 为 {00024500-0000-0000-C000-000000000046}的组件时失败,原因是出现以下错误: 80070005基本上.net导出excel文件,都需要如此配置一下,不配置有的时候没错,而配置后基本应该不会出错。

具体配置方法如下:

① 在服务器上安装office的Excel软件.

② 在"开始"->"运行"中输入dcomcnfg.exe启动"组件服务"

③ 依次双击"组件服务"->"计算机"->"我的电脑"->"DCOM配置"

④ 在"DCOM配置"中找到"Microsoft Excel 应用程序",在它上面点击右键,然后点击"属性",弹出"Microsoft Excel 应用程序属性"对话框

⑤ 点击"标识"标签,选择"交互式用户"

⑥ 点击"安全"标签,在"启动和激活权限"上点击"自定义",然后点击对应的"编辑"按钮,在弹出的"安全性"对话框中填加一个"NETWORK SERVICE"用户(注意要选择本计算机名),并给它赋予"本地启动"和"本地激活"权限.

⑦ 依然是"安全"标签,在"访问权限"上点击"自定义",然后点击"编辑",在弹出的"安全性"对话框中也填加一个"NETWORK SERVICE"用户,然后赋予"本地访问"权限.

⑧ 如果交互式用户设置后出现错误8000401a,可取消交互式用户,指定为administratr,可暂时解决此问题。进一步的解决方式还有待探讨。

⑨ 采用第8点的设置后,打开Excel可能会出现“无法使用对象引用或链接”,并且不能进行单元格粘贴。原因不明,取消设置后。

3. asp excel导出

两种方法

1.拿execl当做数据库来读取

2.可以把excel另存为网页文件,就可以当做文本文件处理了,里面代码可以找到处理规律。

附上处理excel文档的asp代码(就是第一条的方法)

set conn2=CreateObject("ADODB.Connection")

conn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Extended properties=Excel 5.0;Data Source="&file_path&""

sql="select*FROM [student$]"

set rs=conn2.execute(sql)

do while not rs.eof

sql="insert into student([student_name],[student_nick],[student_password])values('"&fixsql(rs(0))&"','"&fixsql(rs(3))&"','"&fixsql(rs(8))&"')"

conn.execute(sql)

rs.movenext

loop

conn2.close

4. asp导出pdf

一般这种上传做法,不建议把数据流写入库通常的作法,只是在上传文件后,把文件的路径写入库这样,你在前台读取时,只要把路径读取就可以打开相应文件

5. asp导出word

叫记事本。

电脑自带的是记事本,又叫文本文档,文件名后缀是.txt word需要安装,文件名后缀是.doc。

记事本除了可以打开默认的txt、ini等文本文档以外,许多种扩展名的文件都可以用记事本打开和编辑后保存,比如注册表文件*.reg、网页的htm、html、asp,许多编程人员都喜欢用记事本把程序写好然后改相应的扩展名。

6. asp导出到mdb

实现数据库和网页的连接

第一种 - 这种方法用在ACCESS中最多

strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("aspfree.mdb")

set conn = server.createobject("adodb.connection")

conn.open strconn

第二种-这种方法用在SQL SERVER中多

strconn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1;UID=LoginIDWD=Password;DATABASE=Database_Name

set conn = server.createobject("adodb.connection")

conn.open strconn

7. asp导出数据到excel文件

有很多方法,一种是直接改EXCEL的模板,让其格式符合你的要求就行了,另一种是在数据前加单引号',并控制一下列宽,还有就是可先处理数据让其符合要求,然后控制列宽。用的最多的是前两种方法

顶一下
(0)
0%
踩一下
(0)
0%
相关评论
我要评论
用户名: 验证码:点击我更换图片