本文介紹了ASP.NET下Excel下載模板、導入、導出操作,供大家參考,具體內容如下
1.下載模板功能
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
protected void btnDownload_Click( object sender, EventArgs e) { var path = Server.MapPath(( "upfiles\\" ) + "test.xlt" ); //upfiles-文件夾 test.xlt-文件 var name = "test.xlt" ; try { var file = new FileInfo(path); Response.Clear(); Response.Charset = "GB2312" ; Response.ContentEncoding = System.Text.Encoding.UTF8; Response.AddHeader( "Content-Disposition" , "attachment; filename=" + Server.UrlEncode(name)); //頭信息,指定默認文件名 Response.AddHeader( "Content-Length" , file.Length.ToString()); //顯示下載進度 Response.ContentType = "application/ms-excel" ; // 指定返回的是一個不能被客戶端讀取的流,必須被下載 Response.WriteFile(file.FullName); // 把文件流發送到客戶端 HttpContext.Current.ApplicationInstance.CompleteRequest(); } catch (Exception ex) { Response.Write( "<script>alert('錯誤:" + ex.Message + ",請盡快與管理員聯系')</script>" ); } } |
2.導入數據
Excel數據導入到數據庫中。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
protected void btnImport_Click( object sender, EventArgs e) { if (FileUpload1.HasFile == false ) //判斷是否包含一個文件 { Response.Write( "<script>alert('請您選擇Excel文件!')</script>" ); //未上傳就點擊了導入按鈕 return ; } string isXls = Path.GetExtension(FileUpload1.FileName).ToString().ToLower(); //獲得文件的擴展名 var extenLen = isXls.Length; if (!isXls.Contains( ".xls" )) //判斷是否 是excel文件 { Response.Write( "<script>alert('只可以選擇Excel文件!')</script>" ); return ; } string filename = FileUpload1.FileName; //獲取Excle文件名 string savePath = Server.MapPath(( "upfiles\\" ) + filename); //Server.MapPath 獲得虛擬服務器相對路徑 string savePath2 = Server.MapPath(( "upfiles\\" )); if (!Directory.Exists(savePath2)) //如果不存在upfiles文件夾則創建 { Directory.CreateDirectory(savePath2); } FileUpload1.SaveAs(savePath); //SaveAs 將上傳的文件內容保存在服務器上 var ds = ExcelSqlConnection(savePath, filename); //將Excel轉成DataSet var dtRows = ds.Tables[0].Rows.Count; var dt = ds.Tables[0]; if (dtRows == 0) { Response.Write( "<script>alert('Excel表無數據!')</script>" ); return ; } try { for ( int i = 0; i < dt.Rows.Count; i++) { string ve = dt.Rows[i][ "車號" ].ToString(); if ( string .IsNullOrEmpty(ve)) //因數據庫中車號不能為空 所以表格中車號為空的跳過這行 { continue ; } //用自己的方式保存進數據庫ADO/EF/... var model = new TEST(); //實體 model.id = 1; model.ve = ve; model.name = dt.Rows[i][ "姓名" ].ToString(); model.Update(); } } catch (Exception ex) { Response.Write( "<script>alert('" + ex.Message + "')</script>" ); } } private DataSet ExcelSqlConnection( string savePath, string tableName) { //string strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + savePath + ";Extended Properties='Excel 8.0;HDR=YES;IMEX=1'"; string strCon = "Provider=Microsoft.Ace.OLEDB.12.0;" + "data source=" + savePath + ";Extended Properties='Excel 12.0; HDR=Yes; IMEX=1'" ; //HDR=YES Excel文件的第一行是列名而不是數據 IMEX=1可必免數據類型沖突 var excelConn = new OleDbConnection(strCon); try { string strCom = string .Format( "SELECT * FROM [Sheet1$]" ); excelConn.Open(); OleDbDataAdapter myCommand = new OleDbDataAdapter(strCom, excelConn); DataSet ds = new DataSet(); myCommand.Fill(ds, "[" + tableName + "$]" ); excelConn.Close(); return ds; } catch (Exception) { excelConn.Close(); //Response.Write("<script>alert('" + ex.Message + "')</script>"); return null ; } } |
3.導出數據到Excel中
插件采用MyXLS.
以下代碼大部分基本不用改。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
private void Export() { XlsDocument xls = new XlsDocument(); org.in2bits.MyXls.Cell cell; int rowIndex = 2; xls.FileName = DateTime.Now.ToString().Replace( "-" , "" ).Replace( ":" , "" ).Replace( " " , "" ) + HttpUtility.UrlEncode( "TEST" ) + ".xls" ; //TEST要改 Worksheet sheet = xls.Workbook.Worksheets.AddNamed( "TEST" ); //狀態欄標題名稱 org.in2bits.MyXls.Cells cells = sheet.Cells; #region 表頭 MergeArea area = new MergeArea(1, 1, 1, 2); //MergeArea(int rowMin, int rowMax, int colMin, int colMax) org.in2bits.MyXls.Cell cellTitle = cells.AddValueCell(1, 1, "TEST" ); //Excel 第一行第1到2列顯示TEST sheet.AddMergeArea(area); cellTitle.Font.Height = 20 * 20; cellTitle.Font.Bold = true ; //設置標題行的字體為粗體 cellTitle.Font.FontFamily = FontFamilies.Roman; //設置標題行的字體為FontFamilies.Roman cellTitle.HorizontalAlignment = HorizontalAlignments.Centered; area = new MergeArea(2, 2, 1, 1); cellTitle = cells.AddValueCell(2, 1, "車號" ); //第二行第一列 顯示車號 sheet.AddMergeArea(area); cellTitle.Font.Bold = true ; cellTitle.Font.Height = 16 * 16; cellTitle.Font.FontFamily = FontFamilies.Roman; cellTitle.HorizontalAlignment = HorizontalAlignments.Centered; cellTitle.VerticalAlignment = VerticalAlignments.Centered; cellTitle.TopLineStyle = 1; cellTitle.BottomLineStyle = 1; cellTitle.LeftLineStyle = 1; cellTitle.RightLineStyle = 1; area = new MergeArea(2, 2, 2, 2); cellTitle = cells.AddValueCell(2, 2, "姓名" ); sheet.AddMergeArea(area); cellTitle.Font.Bold = true ; cellTitle.Font.Height = 16 * 16; cellTitle.Font.FontFamily = FontFamilies.Roman; cellTitle.HorizontalAlignment = HorizontalAlignments.Centered; cellTitle.VerticalAlignment = VerticalAlignments.Centered; cellTitle.TopLineStyle = 1; cellTitle.BottomLineStyle = 1; cellTitle.LeftLineStyle = 1; cellTitle.RightLineStyle = 1; #endregion var list = GetList(); //獲取數據 for ( int i = 0; i < list.Count; i++) { rowIndex++; cell = cells.AddValueCell(rowIndex, 1, list[i].VehicleNO); //車號 cell.TopLineStyle = 1; cell.BottomLineStyle = 1; cell.LeftLineStyle = 1; cell.RightLineStyle = 1; cell = cells.AddValueCell(rowIndex, 2, list[i].Name); //姓名 cell.TopLineStyle = 1; cell.BottomLineStyle = 1; cell.LeftLineStyle = 1; cell.RightLineStyle = 1; } xls.Send(); } |
4.錯誤-未在本地計算機上注冊“Microsoft.ACE.OLEDB.12.0”提供程序
01.將平臺換成X86
02.安裝 AccessDatabaseEngine.exe(點擊下載)
5.錯誤-服務器無法在發送HTTP標頭之后設置內容類型
給導出按鈕增加'全局刷新'的能力。本文例子是aspx做的在<asp:UpdatePanel> 標簽中 增加如下代碼即可
<%--<asp:AsyncPostBackTrigger ControlID="" />--%> <%--局部刷新 值刷新UpdatePanel內部 --%>
<asp:PostBackTrigger ControlID="btnExport" /> <%--全部刷新 --%> <%--2016年7月1日 解決點擊導出按鈕報錯“服務器無法在發送HTTP標頭之后設置內容類型”的錯誤--%>
</Triggers>
以上就是本文的全部內容,希望對大家的學習有所幫助,也希望大家多多支持服務器之家。