js怎樣獲取excel導出控件

1.

function ExportExcel(tableid){//讀取表格中每個單元到EXCEL中

try

{

var curTbl = document.getElementById(tableid);

var oXL = new ActiveXObject("Excel.Application"); //創建AX對象excel

var oWB = oXL.Workbooks.Add(); //獲取workbook對象

var oSheet = oWB.ActiveSheet; //激活當前sheet

var Lenr = curTbl.rows.length; //取得表格行數

for (i = 0; i < Lenr; i++){

var Lenc = curTbl.rows(i).cells.length; //取得每行的列數

for (j = 0; j < Lenc; j++){

oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText; //賦值

}

}

oXL.Visible = true; //設置excel可見屬性

}

catch(e)

{

alert(e.message);

}

}

2：

function dataToExcel(tableid) {//整個表格拷貝到EXCEL中

var curTbl = document.getElementById(tableid);

var oXL;

try {

oXL = GetObject("", "Excel.Application");

}

catch (E) {

try {

oXL = new ActiveXObject("Excel.Application");

}

catch (E2) {

//alert("Please confirm:\n1.Microsoft Excel has been installed.\n2.Internet Options=>Security=>Setting \"Enable unsafe ActiveX\"");

alert("請確認:\n1.機器上Excel已經安裝.\n2.Internet 選項=>安全=>Internet \"對沒有標記為安全的ActiveX控件進行初始化和腳本運行，設定為啟用\"");

return;

}

}

//創建AX對象excel

var oWB = oXL.Workbooks.Add();

//獲取workbook對象

var oSheet = oWB.ActiveSheet;

//激活當前sheet

var sel = document.body.createTextRange();

sel.moveToElementText(curTbl);

//把表格中的內容移到TextRange中

sel.select();

//全選TextRange中內容

sel.execCommand("Copy");

//復制TextRange中內容

oSheet.Paste();

//粘貼到活動的EXCEL中

oXL.Visible = true;

//設置excel可見屬性

}