js控制excel打印解決方案參考

　　做web開發大家都遇到過打印的問題，對于復雜的表格打印著實令人頭痛，這片文章介紹一下使用excel打印的解決方法。 首先，如果客戶端調用excel必須降低ie安全級別，這樣一些非法的控件，如3721什么的都自動安裝了，所以我這樣解決：保持原來的ie設置，把你的站點添加到信任站點，然后更改安全站點的安全級別，這樣就給你的站點設置了一個安全通道，而且阻止了3721等的非法入侵，當然前提是你要讓你的客戶下載一個注冊表并安裝，我是自己做，自己用，所以我得用戶是我說什么都跟著我做，你們就需要說服客戶了：）。

　　好，那么下一步就是如何實現打印了，這里我有非常奪得報表，而且一些非常復雜，如學生成績單，需要按照學年、學期計算學分績點，打印照片，學位授予情況，學籍處理情況，四六級成績，實習，輔修成績，實踐等，那么我如何把這些信息完整的打印到客戶端就是非常麻煩的了，所有我用excel，先做一個模版，然后調用模版填充數據，問題又來了，這么多數據怎么組織呢，摸索好長時間，突然有個想法，把數據的提取單獨寫一個對象，這樣我的程序就簡潔多了，而且最好的是我任何地方都可以一樣使用它。還說成績單，數據非常大，多的要150條數據，所以我的數據源選擇了表格，這樣不必費力的生成什么xml了，顯示的就是我要的數據。ok介紹一下Gettabledata.js：它就是我要的數據對象了，主要功能是從table中提取數據（GetTableData），并提供一個輸出數據的方法（getfielddata），這個基本功能可以滿足我多數的需求。這個我自己寫的一個簡介，怕以后我忘了的：），大家看看有什么不清楚的我補充一下。

　　//Obj參數指定數據的來源(限定Table),默認第一行為字段名稱行

　　//MoveNext方法,參數是表的行向上或向下移動的位數,正數向下移動,負數向上.如.MoveNext(1),.MoveNext(-1)

　　//GetFieldData方法獲得當前行的指定的列名的數,據如：.GetFieldData("考試成績"):列名.GetFieldData(1)：索引

　　//Sort_desc方法對指定的列按降序排列,如.Sort_desc("學年","學期")

　　//Sort_asc方法對指定的列按升序排列,如.Sort_"考試成績:number"):":"后面的參數制定改列數據類型，此例為數字

　　//GetData方法返回字段值為特定值的數據數組,如果沒有字段值則返回所有該字段記錄.可以在外部進行其他處理,不建議直接處理數據：如.GetData()

　　//Delete方法刪除當前記錄,數組減少一行,如:.Delete

　　//updateField更新當前行的指定的索引數據（索引如果是數字，則是列的索引，為字符，是數據字段的名稱）如:MyData.UpdateField("課程號",MyData.GetFieldData("原課程號"))

　　//MoveFirst記錄移動到數據的第一條記錄，注意數據從第二行開始，默認第一行為字段名稱行

　　//MoveLast記錄移動到數據的最后一條記錄

　　//Distinct返回所選記錄的不同記錄的條件個數維數數組,同時升序排序

　　//初始化,Obj:table的名字,Leftlen:左面多余數據長度,Rightlen:右面多余數據長度,

　　//rows屬性:數組行數,cols:列數

　　在示例代碼中Print_bzcjd.js他是打印復雜excel的腳本，

　　var xlBook = xls.Workbooks.Open("c:xsxycjb.xls");

　　var xlsheet = xlBook.Worksheets(1)

　　這個可是使用網絡模板，

　　var xlBook = xls.Workbooks.Open("/PrintTemplatesxsxycjb.xls");

　　var xlsheet = xlBook.Worksheets(1)

　　這個力例子中基本把excel打印需要的技術都展示出來了，如圖片，退出什么的。

　　這里要說明的是table的數據可以是隱藏的，不顯示也可以取出，這樣就可以增加很多數據進來，又不影響界面。

　　Excel.js：這個是清理excel的腳本，當結束excel進程的時候它還沒有推出，清理一下，這個就沒有vs好了：（。

　　這個是一個簡單的示例，就是你給他一個表格名字就可以了，然后生成一個表格，就是這樣:MakeExcel("TABLE1",true,"1.xls"),其他參數可以不要。

　　function MakeExcel(Obj,ProceVisible,SaveAsFilename,SortType,SortField){

　　var MyData= new GetTableData(Obj,0,0);

　　var myrows=MyData.rows;

　　var i,j;

　　try {

　　var xls = new ActiveXObject ( "Excel.Application" );

　　}

　　catch(e) {

　　alert( "要打印該表，您必須安裝Excel電子表格軟件，同時瀏覽器須使用“ActiveX 控件”，您的瀏覽器須允許執行控件。 請點擊【幫助】了解瀏覽器設置方法！");

　　return "";

　　}

　　if (typeof(ProceVisible)=="undefined"){

　　xls.visible = true;

　　}

　　else{

　　if (ProceVisible=="true"){

　　xls.visible = true;

　　}

　　else

　　{

　　xls.visible = false;

　　}

　　}

　　var xlBook = xls.Workbooks.Add;

　　var xlsheet = xlBook.Worksheets(1);

　　xls.Cells.Select;

　　xls.Selection.NumberFormatLocal = "@";

　　for (i=0;iMyData.rows ;i++){

　　for (j=0;jMyData.cols ;j++){

　　if (typeof(MyData.GetFieldData(j)) == "number"){

　　xlsheet.Cells(i+1,j+1).NumberFormatLocal = "0.00_ ";

　　}

　　xlsheet.Cells(i+1,j+1).Value= MyData.GetFieldData(j);

　　}

　　MyData.MoveNext();

　　}

　　if (SaveAsFilename=="" || typeof(SaveAsFilename)=="undefined"){

　　var fname = xls.Application.GetSaveAsFilename("*.xls", "Excel Spreadsheets (*.xls), *.xls");

　　if (fname!=""){

　　xlBook.SaveAs(fname);

　　}

　　}

　　else{

　　xlBook.SaveAs(SaveAsFilename);

　　}

　　xlBook.Close (savechanges=false);

　　//xls.visible = false;

　　xls.Quit();

　　xls=null;

　　//結束excel進程，退出完成

　　window.setInterval("Cleanup();",1);

　　}

【js控制excel打印解決方案參考】相關文章：

解決Excel打印不連續區域的方法08-20

Excel 表格的基本操作教程參考07-16

Excel中公式與函數的應用教案設計參考06-14

excel函數07-30

excel函數[優選]07-31

《初識Excel》說課稿11-14

Excel使用心得05-26

excel表格培訓心得06-22

常用的Excel函數公式11-23

EXCEL學習心得11-25