Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
Mục đích của bài viết này là làm thế nào để hiển thị chính xác giá trị hay nội dung của các Sheet, cả lời chú thích trong một trang aspx. Điều này có thể rất có ích cho người phát triển muốn làm về tự động trong MS Office. Chương trình gồm có 2 Panel, 1 Panel chứa các thành phần điều khiển, Panel còn lại là nơi thể hiện nội dung của file Excel. Ta thấy quy trình tương đối đơn giản: Chọn File cần xem - tách File thành các Sheet - hiển thị các Sheet đó lên | Hiển thị File Excel trong ASP.NET sử dụng C Sharp Mục đích của bài viết này là làm thế nào để hiển thị chính xác giá trị hay nội dung của các Sheet cả lời chú thích trong một trang aspx. Điều này có thể rất có ích cho người phát triển muốn làm về tự động trong MS Office. Chương trình gồm có 2 Panel 1 Panel chứa các thành phần điều khiển Panel còn lại là nơi thể hiện nội dung của file Excel. Ta thấy quy trình tương đối đơn giản Chọn File cần xem - tách File thành các Sheet - hiển thị các Sheet đó lên. Trước hết ta xử lý sự kiện click cho List button protected static string m_strFileName protected void btnAvailableShtAndChrt_Click object sender EventArgs e m_strFileName txtfileValue.PostedFile.FileName if m_strFileName _ lblErrText.Text File không Tồn tại else string strTemp m_strFileName.Substring m_strFileName.Length - 3 strTemp strTemp.ToUpper if strTemp XLS . . . drpShtAndChrt.Items.Clear GetListofSheetsAndCharts m_strFileName true drpShtAndChrt else IblErrText.Text File được chọn không đúng định dạng yêu cầu . Trong hàm này ta xây dựng Hàm GetListofSheetsAndCharts m_strFileName true drpShtAndChrt để tách File thành các Sheet và Chart có nội dung như sau public void GetListofSheetsAndCharts string strFileName bool bReadOnly DropDownList drpList Excel.Workbook workbook null try if bReadOnly mở chế độ Write. workbook appOP.Workbooks.Open strFileName 2 false 5 true Excel.XlPlatform.xlWindows t false true 0 true 1 0 else . Mở chế độ Read workbook appOP.Workbooks.Open strFileName 2 true 5 true Excel.XlPlatform.xlWindows t false true 0 true 1 0 Đọc File Excel. object SheetRChart null int nTotalWorkSheets workbook.Sheets.Count int nIndex 0 for int nWorkSheet 1 nWorkSheet nTotalWorkSheets nWorkSheet SheetRChart workbook.Sheets object nWorkSheet if SheetRChart is Excel.Worksheet Listitem IstItemAdd new ListItem Excel.Worksheet SheetRChart .Name WorkSheet nindex.ToString true drpList.items.Add lstitemAdd IstitemAdd null nindex else if SheetRChart is Excel.Chart Listitem .
