用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法

上传人:宝路 文档编号:18171473 上传时间:2017-11-14 格式:DOCX 页数:3 大小:34.78KB
返回 下载 相关 举报
用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法_第1页
第1页 / 共3页
用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法_第2页
第2页 / 共3页
用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法_第3页
第3页 / 共3页
亲,该文档总共3页,全部预览完了,如果喜欢就下载吧!
资源描述

《用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法》由会员分享,可在线阅读,更多相关《用javascript实现把表格内容导出到excel和把excel里面内容导入表格的方法(3页珍藏版)》请在金锄头文库上搜索。

1、用 javascript 实现把表格内容导出到 excel和把 excel 里面内容导入表格的方法 文件作者 谢晓文 2010-06-08 09:53 阅读 (133) 点评 (3) 资料说明南京泉峰项目的客户提出可以把 excel 的数据导入到表格中,但是客户这边的服务器环境没有安装 excel,所以不能写 ls 代理实现。所以找了一个 js 方法可以满足他们的需求,这里简单推荐一下。顺便把表格导出到 excel 的 js 方法也说一下。一、把 excel 里面内容导入表格,其实就是把 excel 每个单元格数据取出赋值到表格之中1.js 方法/从 excel 导入数据到表格的方法funct

2、ion importExcel(fileName)objCon=new ActiveXObject(ADODB.Connection);objCon.Provider=Microsoft.Jet.OLEDB.4.0;objCon.ConnectionString=Data Source=+fileName+;Extended Properties=Excel 8.0;objCon.CursorLocation=1;objCon.Open;var strQuery;var strSheetName=Sheet1$;var rsTemp=new ActiveXObject(ADODB.Record

3、set);rsTemp=objCon.OpenSchema(20);if(!rsTemp.EOF) strSheetName=rsTemp.Fields(Table_Name).Value;rsTemp=null rsExcel=new ActiveXObject(ADODB.Recordset);strQuery=SELECT * FROM +strSheetName+;rsExcel.ActiveConnection=objCon;rsExcel.Open(strQuery);var j = 1;while(!rsExcel.EOF)for(i=0;i3.直接用方法实现不负责,不过 ie

4、的安全需要设置一下二、把表格内容导出到 excel1.js 方法function exportExcel(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.row

5、s.length; /取得表格行数 oSheet.columns.columnwidth = 20oSheet.columns(1).columnwidth = 5/oSheet.columns(2).columnwidth = 0for (i = 0; i Lenr; i+) var Lenc = curTbl.rows(i).cells.length; /取得每行的列数 for (j = 0; j Lenc; j+) if (j = 0) oSheet.Cells(i + 1,1).value = curTbl.rows(i).cells(j).innerText;else if (j =

6、 1) continue;else if (j = 5) oSheet.Cells(i + 1, j).value = No:+curTbl.rows(i).cells(j).innerText;else oSheet.Cells(i + 1, j).value = curTbl.rows(i).cells(j).innerText; /赋值 oXL.Visible = true; /设置 excel 可见属性 2.调用上面方法,如:exportExcel(VW_VW);/公司产品中视图显示的表格 id 是VW_VW,搜索结果表单的搜索结果的表格也可以调用 exportExcel(viewTable)3.把网站加入可信任站点。

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 行业资料 > 其它行业文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号