全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
纯javascript导出Excel表 方法一:整个表格拷贝到excel中 function method1(tableid) var btn = document.getElementById(copy); btn.setAttribute(disabled, true); btn.setAttribute(value, 处理中.); var curTbl = document.getElementById(tableid); try var oXL = new ActiveXObject(Excel.Application); catch (e) /IE安全级别未设置将出现错误 ( Automation 服务器不能创建对象 ) /* 如果是Scripting.FileSystemObject (FSO 文本文件读写)被关闭了,开启FSO功能即可,在“运行”中执行regsvr32 scrrun.dll即可 */ alert(无法启动Excel!nn如果您确信您的电脑中已经安装了Excel, + 那么请调整IE的安全级别。nn具体操作:nn + 工具 Internet选项 安全 自定义级别 对没有标记为安全的ActiveX进行初始化和脚本运行 启用); return false;var oWB = oXL.Workbooks.Add();var oSheet = oWB.ActiveSheet;var sel = document.body.createTextRange();sel.moveToElementText(curTbl);sel.select();sel.execCommand(Copy);oSheet.Paste();oXL.Visible = true;var fname = oXL.Application.GetSaveAsFilename(将table导出到excel.xls, Excel Spreadsheets (*.xls), *.xls);oWB.SaveAs(fname);oWB.Close();oXL.Quit();/控制按钮btn.removeAttribute(disabled); btn.setAttribute(value, 导出结果到Excel); function method1(tableid) /整个表格拷贝到EXCEL中 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 sel = document.body.createTextRange(); sel.moveToElementText(curTbl); /把表格中的内容移到TextRange中 sel.select(); /全选TextRange中内容 sel.execCommand(Copy); /复制TextRange中内容 oSheet.Paste(); /粘贴到活动的EXCEL中 oXL.Visible = true; /设置excel可见属性 方法二:读取单元格到excel中 function method2(tableid) /读取表格中每个单元到EXCEL中 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 + e.description + !); function getTblData(inTbl, inWindow) var rows = 0; /alert(getTblData is + inWindow); var tblDocument = document; if (!inWindow & inWindow != ) if (!document.all(inWindow) return null; else tblDocument = eval(inWindow).document; var curTbl = tblDocument.getElementById(inTbl); var outStr = ; if (curTbl != null) for (var j = 0; j curTbl.rows.length; j+) /alert(j is + j); for (var i = 0; i 0) outStr += t; rows -= 1; outStr += curTbl.rowsj.cellsi.innerText + t; if (curTbl.rowsj.cellsi.colSpan 1) for (var k = 0; k 1) rows = curTbl.rowsj.cellsi.rowSpan - 1; outStr += rn; else outStr = null; alert(inTbl + 不存在!); return outStr; function getExcelFileName() var d = new Date(); var curYear = d.getYear(); var curMonth = + (d.getMonth() + 1); var curDate = + d.getDate(); var curHour = + d.getHours(); var curMinute = + d.getMinutes(); var curSecond = + d.getSeconds(); if (curMonth.length = 1) curMonth = 0 + curMonth; if (curDate.length = 1) curDate = 0 + curDate; if (curHour.length = 1) curHour = 0 + curHour; if (curMinute.length = 1) curMinute = 0 + curMinute; if (curSecond.length = 1) curSecond = 0 + curSecond; var fileName = leo_zhang + _ + curYear + curMonth + curDate + _ + curHour + curMinute + curSecond + .csv; /alert(fileName); return fileName; function doFileExport(inName, inStr) var xlsWin = null; if (!document.all(glbHideFrm) xlsWin = glbHideFrm; else var width = 6; var height = 4; var openPara = left= + (window.screen.width / 2 - width / 2) + ,top= + (window.screen.height / 2 - height / 2) + ,scrollbars=no,width= + width + ,heigh
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 电气运行员考试题及答案
- 锅炉酸洗方案
- 长沙FPC项目可行性研究报告
- 高低压电气设备项目可行性研究报告
- 2025年成都百万职工技能大赛(焊工)备赛试题库(含答案)
- 2020-2025年一级建造师之一建水利水电工程实务题库综合试卷A卷附答案
- 2020-2025年教师资格之中学生物学科知识与教学能力能力测试试卷B卷附答案
- 物料包销协议书模板
- 物联网接口协议书
- 复古风琴数字化改造创新创业项目商业计划书
- 2025江苏苏州新主城物业服务有限公司、苏州新区枫桥万厦物业管理有限公司招聘5人考试笔试备考题库及答案解析
- 入股公司食品协议书
- 高级保安员(三级)资格考试题库(精简300题)
- 交流串激电机基本知识培训课件
- 广告设计师三级理论知识试卷
- 设备管理设备管理的基本内容课件
- 2020年(建筑工程制度及套表)四川省建筑工程资料表格
- 特种作业人员持证情况自查表
- 功能说明书-sap与立体仓库接口开发
- 2022年中小学心理健康教育指导纲要
- GA∕T 1044.1-2012 道路交通事故现场安全防护规范 第1部分:高速公路
评论
0/150
提交评论