通过复制Table生成word和excel的javascript代码


Posted in Javascript onJanuary 20, 2014
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 
<html xmlns="http://www.w3.org/1999/xhtml"> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title>无标题文档</title> 
<script language="javascript"> 
function AutomateWordAutoPaging(prefixion,Count) 
{ 
var oWD = new ActiveXObject("Word.Application"); 
var oDC = oWD.Documents.Add(); 
oDC.ShowGrammaticalErrors = false; //屏蔽语法检查 
oDC.ShowSpellingErrors = false; //屏蔽拼写检查 
var oRange =oDC.Range(0,1); for (i=0;i<Count;i++) 
{ 
var sel = document.body.createTextRange(); 
var TableName = prefixion+i; 
var Table = document.getElementById(TableName) 
sel.moveToElementText(Table); 
sel.select(); 
sel.execCommand("Copy"); 
oWD.Selection.Paste(); 
oWD.Selection.InsertBreak(); //插入分页符 
} 
//oWD.ActiveDocument.ActiveWindow.View.Type=3 //设置浏览模式 
oWD.Visible = true; 
}; 
function AutomateExcel(prefixion) 
{ 
var elTable = document.getElementById("AutomateExcel"); 
var oRangeRef = document.body.createTextRange(); 
oRangeRef.moveToElementText(elTable); 
oRangeRef.execCommand("Copy"); 
try{ 
var appExcel = new ActiveXObject( "Excel.Application" ); 
}catch(e) 
{ 
alert("无法调用Office对象,请确保您的机器已安装了Office并已将本系统的站点名加入到IE的信任站点列表中!"); 
return; 
} 
appExcel.Visible = true; 
appExcel.Workbooks.Add().Worksheets.Item(1).Paste(); 
appExcel.Workbooks(1).Worksheets.Item(1).Columns("A:A").ColumnWidth = 100; 
//appExcel.Workbooks(1).Worksheets.Item(1).Columns("B:B").ColumnWidth = 21; 
appExcel = null 
}; 
</script> 
</head> 
<body> 
<input type="button" value="导出到Word自动分页" onclick="AutomateWordAutoPaging('Table',5)" /> 
<input type="button" value="导出到Excel控制列宽" onclick="AutomateExcel('Table')"/> 
<div id="AutomateExcel"> 
<TABLE class=tabp id="Table0" cellSpacing=0 cellPadding=2 width="100%" align=center border=1> 
<TR> 
<TD width="100%" align="center">标题0</TD> 
</TR> 
<TR> 
<TD align="center">内容0</TD> 
</TR> 
</TABLE> 
<BR> 
<TABLE class=tabp id="Table1" cellSpacing=0 cellPadding=2 width="100%" align=center border=1> 
<TR> 
<TD width="100%" align="center">标题1</TD> 
</TR> 
<TR> 
<TD align="center">内容1</TD> 
</TR> 
</TABLE> 
<BR/> 
<TABLE class=tabp id="Table2" cellSpacing=0 cellPadding=2 width="100%" align=center border=1> 
<TR> 
<TD width="100%" align="center">标题2</TD> 
</TR> 
<TR> 
<TD align="center">内容2</TD> 
</TR> 
</TABLE> 
<BR/> 
<TABLE class=tabp id="Table3" cellSpacing=0 cellPadding=2 width="100%" align=center border=1> 
<TR> 
<TD width="100%" align="center">标题3</TD> 
</TR> 
<TR> 
<TD align="center">内容3</TD> 
</TR> 
</TABLE> 
<BR/> 
<TABLE class=tabp id="Table4" cellSpacing=0 cellPadding=2 width="100%" align=center border=1> 
<TR> 
<TD width="100%" align="center">标题4</TD> 
</TR> 
<TR> 
<TD align="center">内容4</TD> 
</TR> 
</TABLE> 
<BR/> 
</div> 
</body> 
</html>
Javascript 相关文章推荐
JavaScript高级程序设计
Dec 29 Javascript
表单(FORM)的一些实用效果代码
Mar 25 Javascript
有一段有意思的代码-javascript现实多行信息
Aug 26 Javascript
利用腾讯的ip地址库做ip物理地址定位
Jul 24 Javascript
HTTP 304错误的详细讲解
Nov 13 Javascript
JQuery文字列表向上滚动的代码
Nov 13 Javascript
js实现精美的银灰色竖排折叠菜单
May 16 Javascript
jquery动画效果学习笔记(8种效果)
Nov 13 Javascript
遍历js中对象的属性和值的实例
Nov 21 Javascript
Vue插件从封装到发布的完整步骤记录
Feb 28 Javascript
vue鼠标悬停事件实例详解
Apr 01 Javascript
解决vue+ element ui 表单验证有值但验证失败问题
Jan 16 Javascript
js取值中form.all和不加all的区别介绍
Jan 20 #Javascript
如何实现textarea里的不同文本显示不同颜色
Jan 20 #Javascript
引用外部脚本时script标签关闭的写法
Jan 20 #Javascript
用jquery写的一个万年历(自写)
Jan 20 #Javascript
js控制input框只读实现示例
Jan 20 #Javascript
js给页面加style无效果的解决方法
Jan 20 #Javascript
javascript自动给文本url地址增加链接的方法分享
Jan 20 #Javascript
You might like
php mysql数据库操作分页类
2008/06/04 PHP
PHP微信开发用Cache 解决数据缓存
2016/07/11 PHP
php正则提取html图片(img)src地址与任意属性的方法
2017/02/08 PHP
基于jquery实现的鼠标拖拽元素复制并写入效果
2011/08/23 Javascript
jQuery数组处理代码详解(含实例演示)
2012/02/03 Javascript
jquery获取table中的某行全部td的内容方法
2013/03/08 Javascript
window.print打印指定div实例代码
2013/12/13 Javascript
jquery左边浮动到一定位置时显示返回顶部按钮
2014/06/05 Javascript
jquery实现鼠标滑过显示二级下拉菜单效果
2015/08/24 Javascript
jQuery实现滑动页面固定顶部显示(可根据显示位置消失与替换)
2015/10/28 Javascript
AngularJS表单详解及示例代码
2016/08/17 Javascript
Bootstrap实现导航栏的2种方式
2016/11/28 Javascript
node.js的事件机制
2017/02/08 Javascript
bootstrap 下拉多选框进行多选传值问题代码分析
2017/02/14 Javascript
浅谈js for循环输出i为同一值的问题
2017/03/01 Javascript
基于ExtJs在页面上window再调用Window的事件处理方法
2017/07/26 Javascript
webpack分离css单独打包的方法
2018/06/12 Javascript
jQuery对底部导航进行跳转并高亮显示的实例代码
2019/04/23 jQuery
微信小程序如何实现radio单选框单击打勾和取消
2020/01/21 Javascript
Vue常用的全选/反选的示例代码
2020/02/19 Javascript
vue使用swiper实现左右滑动切换图片
2020/10/16 Javascript
[01:10]DOTA2亚洲邀请赛 征战号角响彻全场
2015/01/06 DOTA
Python学习思维导图(必看篇)
2017/06/26 Python
使用python根据端口号关闭进程的方法
2018/11/06 Python
用python写一个定时提醒程序的实现代码
2019/07/22 Python
python第三方库学习笔记
2020/02/07 Python
Python爬虫实战案例之爬取喜马拉雅音频数据详解
2020/12/07 Python
3D动画《斗罗大陆》上线当日播放过亿
2021/03/16 国漫
AmazeUI 按钮交互的实现示例
2020/08/24 HTML / CSS
这段代码难道不该打印出56吗
2013/02/27 面试题
语文教学随笔感言
2014/02/18 职场文书
财政专业求职信范文
2014/02/19 职场文书
工地例会施工汇报材料
2014/08/22 职场文书
表扬信范文
2019/04/22 职场文书
大学生入党自我鉴定范文
2019/06/21 职场文书
vue-router中hash模式与history模式的区别
2021/06/23 Vue.js