js如何导出exel文件？
发布网友
发布时间：2022-04-22 16:50
共1个回答
热心网友
时间：2023-10-22 06:12
一。导出Excel有两种：\x0d\x0a1.\x0d\x0afunction ExportExcel(tableid){//读取表格中每个单元到EXCEL中 \x0d\x0atry\x0d\x0a{\x0d\x0avar curTbl = document.getElementById(tableid); \x0d\x0avar oXL = new ActiveXObject("Excel.Application"); //创建AX对象excel \x0d\x0avar oWB = oXL.Workbooks.Add(); //获取workbook对象 \x0d\x0avar oSheet = oWB.ActiveSheet; //激活当前sheet \x0d\x0avar Lenr = curTbl.rows.length; //取得表格行数 \x0d\x0afor (i = 0; i < Lenr; i++){ \x0d\x0avar Lenc = curTbl.rows(i).cells.length; //取得每行的列数 \x0d\x0afor (j = 0; j < Lenc; j++){ \x0d\x0aoSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText; //赋值 \x0d\x0a} \x0d\x0a} \x0d\x0aoXL.Visible = true; //设置excel可见属性 \x0d\x0a}\x0d\x0acatch(e)\x0d\x0a{\x0d\x0aalert(e.message);\x0d\x0a}\x0d\x0a}\x0d\x0a2：\x0d\x0afunction dataToExcel(tableid) {//整个表格拷贝到EXCEL中\x0d\x0avar curTbl = document.getElementById(tableid); \x0d\x0avar oXL; \x0d\x0atry { \x0d\x0aoXL = GetObject("", "Excel.Application"); \x0d\x0a} \x0d\x0acatch (E) { \x0d\x0atry { \x0d\x0aoXL = new ActiveXObject("Excel.Application"); \x0d\x0a} \x0d\x0acatch (E2) { \x0d\x0a//alert("Please confirm:\n1.Microsoft Excel has been installed.\n2.Internet Options=>Security=>Setting \"Enable unsafe ActiveX\""); \x0d\x0aalert("请确认:\n1.机器上Excel已经安装.\n2.Internet 选项=>安全=>Internet \"对没有标记为安全的ActiveX控件进行初始化和脚本运行，设定为启用\"");\x0d\x0areturn; \x0d\x0a} \x0d\x0a}\x0d\x0a//创建AX对象excel \x0d\x0avar oWB = oXL.Workbooks.Add(); \x0d\x0a//获取workbook对象 \x0d\x0avar oSheet = oWB.ActiveSheet; \x0d\x0a//激活当前sheet \x0d\x0avar sel = document.body.createTextRange(); \x0d\x0asel.moveToElementText(curTbl); \x0d\x0a//把表格中的内容移到TextRange中 \x0d\x0asel.select(); \x0d\x0a//全选TextRange中内容 \x0d\x0asel.execCommand("Copy"); \x0d\x0a//复制TextRange中内容 \x0d\x0aoSheet.Paste(); \x0d\x0a//粘贴到活动的EXCEL中 \x0d\x0aoXL.Visible = true; \x0d\x0a//设置excel可见属性 \x0d\x0a}
