excel导出

function AllAreaExcel()
{
var oXL = new ActiveXObject("Excel.Application");
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var sel=document.body.createTextRange();
sel.moveToElementText(bb);
sel.select();
sel.execCommand("Copy");
oSheet.Paste();
oXL.Visible = true;
}
function CellAreaExcel()
{
var oXL = new ActiveXObject("Excel.Application");
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var Lenr = bb.rows.length;
for (i=0;i<Lenr;i++)
{
var Lenc = bb.rows(i).cells.length;
for (j=0;j<Lenc;j++)
{
oSheet.Cells(i+1,j+1).value = bb.rows(i).cells(j).innerText;
}
}
oXL.Visible = true;
}


要导出时调用以上JS就可以了，其中bb为table表单的id。
还有要对浏览器进行设置：工具-internet选项-安全-自定义级别，对没有标记为安全的ActiveX控件……这一项启用。
这样就OK了。