.NET下Excel報表的打印


說明:這是一個實驗的小例子,在實際項目中使用時,一般Object[,] 對象的數據來源於數據庫。

1. 實驗環境

開發平台:Visual Studio 2010

測試模板:JBtest

Excel:Office2007 Excel

2. 項目所用組件

 

為什么選擇ASP.NET做打印的功能,因為office和Visual  studio同是微軟的開發軟件,具有良好的兼容性,利用上述.dll組件,可以輕松實現excel模板的導入和excel數據的導出。

ExcelQuicker.dll動態鏈接庫需要在網上下載,引用到項目中才可以使用。我用的這個版本比較早,版本號是2.2.0.0。現在的更新版本可能修改了一些函數和類的名稱,請參考后使用。

3. webconfig配置

4.項目結構

以上是項目的整體結構,其中,測試網頁為Default.aspx。Lib目錄下的ExcelQuicker.xml為ExcelQuicker組件的配置文檔,Message.xml為導入出錯時報錯的信息。

 

5.報表打印

首先在實現打印的網頁后台引用命名空間:using ExcelQuicker.Framework;

利用ExcelQuicker.Framework空間的相應類提供的接口實現報表的新建

EQApplication objApp = new EQApplication(strFileName, EQReportFormat.Excel, strTemplate, false);

  EQWorksheet objWS = new EQWorksheet("報表數據");

 

數據寫入到excel文檔里類似於VBA編程,具體細節功能請參考代碼:Default.aspx.cs  

EQRange range = new EQRange(objData, 11, 5, 15, 5);   //從“11行 5列” 到 “22行  5列”    

 objWS.Add(range);

 

Default.aspx.cs后台主要代碼: 

 protected void dy_Click1(object sender, EventArgs e)
        {
            string wjm;
            string strTemplate = "JBtest.xls";//模板文件名稱
            Initialize();//調用excel quicker初始化函數
            // string strFileName = Session["yhid"].ToString();
            string strFileName = "wangling";
            wjm = strFileName;
            wjm = wjm + "_" + strTemplate;
            set_Excel(wjm, strTemplate);//生成並設置此excel表
            Response.Redirect("..\\ExcelQuicker\\TempReports\\" + wjm);
        }
        public void Initialize()
        {

            EQConfiguration.XmlFileName = HttpRuntime.AppDomainAppPath + "ExcelQuicker\\Lib\\Message.xml";
            EQConfiguration.Language = "EN";
            EQConfiguration.TemporaryFilePath = HttpRuntime.AppDomainAppPath + "ExcelQuicker\\TempReports\\";
            EQConfiguration.OutputFilePath = HttpRuntime.AppDomainAppPath + "ExcelQuicker\\TempReports\\";
            EQConfiguration.TemplateFilePath = HttpRuntime.AppDomainAppPath + "jb\\xls\\";
        }

        void set_Excel(string strFileName, string strTemplate)
        {


            EQApplication objApp = new EQApplication(strFileName, EQReportFormat.Excel, strTemplate, false);
            EQWorksheet objWS = new EQWorksheet("報表數據");

            object[,] objData, objData3, objData4, objData5, objData6, objData7;
            objData = new object[5, 1];//用於存放要填充到Excel中的數據

            objData3 = new object[8, 1];

            objData4 = new object[1, 1];
            objData5 = new object[3, 1];

            objData6 = new object[8, 1];
            objData7 = new object[8, 1];

            string ren, ren1, ren2, ren3;
            objData[0, 0] = congye .Text  ;//從業人員期末人數
            objData[1, 0] = guanli .Text ;//單位負責人
            objData[2, 0] = zaigang .Text ;//在崗職工
            objData[3, 0] = laowu .Text ;//勞務派遣人員
            objData[4, 0] =qita0 .Text ;//其他從業人員



            ren = "188" + "  人";
            ren1 = "22" + "  人";
            ren2 = "33" + "  人";
            ren3 = "44" + "  人";
            objData4[0, 0] = ren;//直接從事生產經營活動的平均人數
            objData5[0, 0] = ren1;//其中:工程技術人員
            objData5[1, 0] = ren2;//其中:一級建造師
            objData5[2, 0] = ren3;//其中:現場施工人員



            EQRange range = new EQRange(objData, 11, 5, 15, 5);   //從“11行 5列” 到 “22行  5列”     
            objWS.Add(range);

            EQRange range4 = new EQRange(objData4, 30, 3, 30, 3);   //從“11行 5列” 到 “22行  5列”     
            objWS.Add(range4);
            EQRange range5 = new EQRange(objData5, 32, 6, 34, 6);   //從“11行 10列” 到 “22行  10列”     
            objWS.Add(range5);




            objData7[0, 0] = pingjun .Text ;
            objData7[1, 0] =zaigangpj0.Text ;
            objData7[2, 0] = laowupj0.Text ;
            objData7[3, 0] = qitapj.Text ;
            //range7 1-本季 平均人數//
            EQRange range7 = new EQRange(objData7, 16, 5, 19, 5);
            objWS.Add(range7);



            objData3[0, 0] =congyeg.Text ;//從業人員工資總額
            objData3[1, 0] = zaizhig.Text  ;//在崗職工工資總額
            objData3[2, 0] = laog .Text ;//勞務派遣人員工資總額
            objData3[3, 0] = qitag.Text ;//其他從業人員工資總額

            EQRange range3 = new EQRange(objData3, 21, 5, 24, 5);   //從“11行 10列” 到 “22行  10列”     
            objWS.Add(range3);



            objData6[0, 0] = congyepjg.Text ;

            objData6[1, 0] = zaigangpjg.Text ;

            objData6[2, 0] =laowupjg.Text ;

            objData6[3, 0] = qitapjg.Text ;


            EQRange range6 = new EQRange(objData6, 25,5,28, 5);
            objWS.Add(range6);

            //以下填寫報送人員信息
            string ryxx = "單位負責人: " + df.Text + "    統計負責人:" + xf.Text + " 填表人:" + tf.Text;


            objData = new object[1, 1];
            objData[0, 0] = ryxx;
            range = new EQRange(objData, 35, 1, 35, 1);
            objWS.Add(range);

            //以下填寫表頭單位名稱

            objData = new object[1, 1];
            objData[0, 0] = "Excel表格數據導出測試";
            range = new EQRange(objData, 7, 1, 7, 1);
            objWS.Add(range);
            objApp.Add(objWS);

            try
            {
                objApp.Output();
            }
            catch (Exception)
            {
                objApp.Dispose();
            }
        }

6. 效果截圖

界面上填寫數據,把填寫的數據導入到對應的excel文檔里面

填寫數據后,點擊導出excel按鈕,出現如圖界面

打印到Excel后的結果

以上小例子下載:Demo.zip

 

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM