您的位置:首页 > Web前端 > JavaScript

js实现把网页table导成Excel

2014-03-11 09:09 351 查看
//导出excel
function exportExcel(DivID,strTitle){
if(DivID==null)
{
return false;
}
var jXls, myWorkbook, myWorksheet;
try {
jXls = new ActiveXObject('Excel.Application');
}
catch (e) {
alert("无法启动Excel!\n\n如果您确信您的电脑中已经安装了Excel,"+"那么请调整IE的安全级别。\n\n具体操作:\n\n"+"工具 → Internet选项 → 安全 → 自定义级别 → 对

没有标记为安全的ActiveX进行初始化和脚本运行 → 启用");
return false;
}
jXls.DisplayAlerts = false;
myWorkbook = jXls.Workbooks.Add();
var curTb = document.getElementById(DivID);
myWorksheet = myWorkbook.ActiveSheet;
myWorksheet.name=strTitle;
var sel = document.body.createTextRange();
sel.moveToElementText(curTb);
sel.select();
window.clipboardData.setData('text','');
sel.execCommand("Copy");
myWorksheet.Paste();
jXls.Visible = true;
try{
var fname = jXls.Application.GetSaveAsFilename("OA数据"+strTitle+".xls", "Excel Spreadsheets (*.xls), *.xls");
}catch(e){
print("Nested catch caught " + e);
}
finally{
if(fname!=false)
{
myWorkbook .SaveAs(fname);
alert("数据成功保存在:"+fname);
}
}
//   myWorkbook .Close(savechanges=false);
// jXls.Quit();
window.clipboardData.setData('text','');
jXls = null;
myWorkbook = null;
myWorksheet = null;
}


<table class="oa-el-grid-list" id="tb" style="width:99%" cellspacing="0" cellpadding="0"
border="0">
<thead>
<%=tab_html%>
</thead>
<%=TableHtml %>
</table>

<input id="btnSavExcel" onclick="exportExcel('tb','……表')" type="button" value="导出"  />
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: