通过复制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 打开页面window.location和window.open的区别
Mar 17 Javascript
解决ueditor jquery javascript 取值问题
Dec 30 Javascript
jQuery修改class属性和CSS样式整理
Jan 30 Javascript
js实现常用排序算法
Aug 09 Javascript
vue-resource 拦截器使用详解
Feb 21 Javascript
Angular 4中如何显示内容的CSS样式示例代码
Nov 06 Javascript
JS异步执行结果获取的3种解决方式
Feb 19 Javascript
Vue中的验证登录状态的实现方法
Mar 09 Javascript
vue+layui实现select动态加载后台数据的例子
Sep 20 Javascript
js实现漂亮的星空背景
Nov 01 Javascript
微信小程序实现音乐播放器
Nov 20 Javascript
Element-UI 使用el-row 分栏布局的教程
Oct 26 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实现的美国50个州选择列表实例
2015/04/20 PHP
关于php几种字符串连接的效率比较(详解)
2017/02/22 PHP
使用PHP访问RabbitMQ消息队列的方法示例
2018/06/06 PHP
php实现将数组或对象写入到文件的方法小结【三种方法】
2020/04/22 PHP
另一个javascript小测验(代码集合)
2011/07/27 Javascript
javascript中的toFixed固定小数位数 简单实例分享
2013/07/12 Javascript
jquery next nextAll nextUntil siblings的区别介绍
2013/10/05 Javascript
js判断当页面无法回退时关闭网页否则就history.go(-1)
2014/08/07 Javascript
JS实现仿微博可关闭弹出层效果
2015/09/21 Javascript
Bootstrap中文本框的宽度变窄并且加入一副验证码图片的实现方法
2016/06/23 Javascript
JS前端加密算法示例
2016/12/22 Javascript
js阻止移动端页面滚动的两种方法
2017/01/25 Javascript
jQuery使用JSONP实现跨域获取数据的三种方法详解
2017/05/04 jQuery
Angular浏览器插件Batarang介绍及使用
2018/02/07 Javascript
Vue常用的几个指令附完整案例
2018/11/06 Javascript
如何手写简易的 Vue Router
2020/10/10 Javascript
[06:14]《辉夜杯》外卡赛附加赛 4支战队巡礼
2015/10/23 DOTA
Python3实现将文件树中所有文件和子目录归档到tar压缩文件的方法
2015/05/22 Python
让python 3支持mysqldb的解决方法
2017/02/14 Python
python使用threading获取线程函数返回值的实现方法
2017/11/15 Python
解决python xlrd无法读取excel文件的问题
2018/12/25 Python
Django后端接收嵌套Json数据及解析详解
2019/07/17 Python
关于Python3 类方法、静态方法新解
2019/08/30 Python
python列表插入append(), extend(), insert()用法详解
2019/09/14 Python
Python AutoCAD 系统设置的实现方法
2020/04/01 Python
让Django的BooleanField支持字符串形式的输入方式
2020/05/20 Python
详解CSS3媒体查询响应式布局bootstrap 框架原理实战(推荐)
2020/11/16 HTML / CSS
美国最大的农村生活方式零售店:Tractor Supply Company(TSC)
2017/05/15 全球购物
联想澳大利亚官网:Lenovo Australia
2018/01/18 全球购物
澳大利亚在线消费电子产品商店:TobyDeals
2020/01/05 全球购物
宾馆总经理岗位职责
2014/02/14 职场文书
安徽导游词
2015/02/12 职场文书
go mod 安装依赖 unkown revision问题的解决方案
2021/05/06 Golang
Python3中PyQt5简单实现文件打开及保存
2021/06/10 Python
postgresql 删除重复数据案例详解
2021/08/02 PostgreSQL
python周期任务调度工具Schedule使用详解
2021/11/23 Python