ASP.NET用DataSet导出到Excel的方法

时间:2021-05-28

复制代码 代码如下:
/读取临时文件

GYYW.DA.Common.Base_SqlDataBase daBZDM = new GYYW.DA.Common.Base_SqlDataBase();

DataSet dsBZDM = daBZDM.GetDataSetBySql("select QCDM,MC,GG from WG_BZDM where QCDM like '02%'");


//同时将虚拟目录下的Data作为临时文件目录。

string urlPath = HttpContext.Current.Request.ApplicationPath + "/Data/";

string physicPath = HttpContext.Current.Server.MapPath(urlPath);

//string fileName = Guid.NewGuid() + ".Xls";

string fileName ="DownLoad.Xls";

string connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + physicPath + fileName +";Extended Properties=Excel 8.0;";

OleDbConnection objConn = new OleDbConnection(connString);

OleDbCommand objCmd = new OleDbCommand();

objCmd.Connection = objConn;

objCmd.Connection.Open();

//建立表结构

objCmd.CommandText = @"CREATE TABLE Sheet1(器材代码 varchar,名称 varchar, 规格 varchar)";

objCmd.ExecuteNonQuery();

//建立插入动作的Command

objCmd.CommandText = "INSERT INTO Sheet1(器材代码, 名称,规格) VALUES (@QCDM, @MC, @GG)";

objCmd.Parameters.Clear();


objCmd.Parameters.Add(new OleDbParameter("@QCDM", OleDbType.VarChar));

objCmd.Parameters.Add(new OleDbParameter("@MC", OleDbType.VarChar));

objCmd.Parameters.Add(new OleDbParameter("@GG",OleDbType.VarChar));

//遍历DataSet将数据插入新建的Excel文件中

foreach (DataRow row in dsBZDM.Tables[0].Rows)

{

for (int i=0; i<objCmd.Parameters.Count; i++)

{

objCmd.Parameters[i].Value = row[i];

}

objCmd.ExecuteNonQuery();

}

objCmd.Connection.Close();


//提供下载

//清除临时文件

HttpResponse response = HttpContext.Current.Response;

response.Clear();

//为输出作准备

response.WriteFile(urlPath + fileName);

string httpHeader="attachment;filename=KCMX.Xls";

response.AppendHeader("Content-Disposition", httpHeader);

response.Flush();

//输出完毕后清除临时文件

string strSaveDir = "../Data/";

string strFile = Server.MapPath(strSaveDir + fileName).ToString();

//string sss = urlPath + fileName;

System.IO.File.Delete(strFile);//删除临时文件

response.End();

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章