web 打印 Excel列印方式

最新推荐文章于 2024-10-18 16:39:04 发布

hyj_828

最新推荐文章于 2024-10-18 16:39:04 发布

阅读量740

点赞数

文章标签： excel web exception function kill null

本文链接：https://blog.csdn.net/hyj_828/article/details/3850663

版权

使用excel列印web頁面函數如下：

// kill Excel process
var idTmr = "";

function   Cleanup()   {
      window.clearInterval(idTmr);
      CollectGarbage();
}

function PrintData(printBaseSpace)
{
    try{
        var oXL = new ActiveXObject("Excel.Application");
        var oWB = oXL.Workbooks.Add();
        var oSheet = oWB.ActiveSheet;
    }catch(e){
        alert("創建excel物件失敗，請確認已經安裝了Excel軟體!");
        return false;
    }
    var mastPrintSpace= document.getElementById(printBaseSpace);

    var newWD=window.open();
    newWD.document.write("<html><title><//title>");

    //加入樣式表
    newWD.document.write("<head><link href=/"../css/Global.css/" rel=/"Stylesheet/" type=/"text/css/" //>");
    newWD.document.write("<//head><br>");
    newWD.document.write("<body><br>");
    newWD.document.write(mastPrintSpace.innerHTML);
    newWD.document.write("<//body>");
    newWD.document.write("<//html>");

    var sel=newWD.document.body.createTextRange();

    sel.select();
    sel.execCommand("Copy");
    oSheet.Paste();

    newWD.close();
    newWD = null;

    oXL.Visible = true;

     idTmr   =   window.setInterval("Cleanup();",10);
    }catch(Exception)
    {
        //用戶點擊保存對話視窗的取消按鈕產生異常。
    }
}