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

複製代碼 代碼如下: /讀取臨時檔案

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();