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

 通过复制Table生成word和excel,个人感觉这个功能还是比较实用的,下面有个不错的示例,希望对大家有所帮助

代码如下:
<!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> 

时间: 2024-10-31 17:43:43

通过复制Table生成word和excel的javascript代码的相关文章

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

复制代码 代码如下: <!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=&qu

php生成word文档并下载代码

php教程生成word文档并下载代码 include("include/conn_mysql教程.php");   $id=$_GET["id"];   $sql="select * from  down where id=$id ";   $result=mysql_query($sql);     $row=mysql_fetch_row($result);   $file2=$row["upload"];   funct

ASP+模板生成Word、Excel、静态页

用模板生成Excel.Word最大优点:    Word.Excel文档样式易于控制和调整,以往用Excel.Application来生成Excel.Word,需要写很多代码来控制排版的样式,用模版几乎不受任何限制,只需要打开word或Excel,编辑文档,选择"文件->另存为web页",即可方便的做好模板 ,用office生成的模板要比直接在DW中做好模板更加符合office偏好,生成后文件样式可与原word.Excel格式99%一样,因此建议大家用office(office9

ASP+模板生成Word、Excel、html的代码第1/2页_应用技巧

大多数都是采用Excel.Application(http://www.blueidea.com/tech/program/2006/3547.asp)组件来生成发现容易出错,而且对于大多数和我一样的菜鸟来说,比较麻烦,考虑到前些天用ASP+模板+adodb.stream生成静态页面的办法,经过多次尝试,终于掌握了一种用ASP+模板生成Excel和word的新的办法,先分享如下:  用模板生成Excel.Word最大优点:         Word.Excel文档样式易于控制和调整,以往用Exc

ASP+模板生成Word、Excel、html的代码第1/2页

大多数都是采用Excel.Application(http://www.blueidea.com/tech/program/2006/3547.asp)组件来生成 发现容易出错,而且对于大多数和我一样的菜鸟来说,比较麻烦,考虑到前些天用ASP+模板+adodb.stream生成静态页面的办法,经过多次尝试,终于掌握了一种用ASP+模板生成Excel和word的新的办法,先分享如下: 用模板生成Excel.Word最大优点: Word.Excel文档样式易于控制和调整,以往用Excel.Appli

ASP输出生成Word 、Excel、Txt文件的方法

  在ASP中生成Word文件.Excel文件和Txt文件,参考了微软的官方文档,自己简单弄了下,基本可以实现了,不足之处,望指导!下面言归正传. 1.用ASP生成Word文档,代码示例:     用这种方法生成的Word文档,有时候会出现一个提示:"Microsoft Office Word 需要转换器以正确显示该文件.这项功能目前尚未安装,是否现在安装?",这时候重新安装SKU011.CAB就可以了,原因不明. 2.ASP生成Excel文档:   3.ASP生成Txt文档,这个最简

javascript 操作Word和Excel的实现代码_javascript技巧

1.保存html页面到word 复制代码 代码如下: <HTML> <HEAD> <title> </title> </HEAD> <body> <form id="form"> <table id = "PrintA" width="100%" border="1" cellspacing="0" cellpaddi

c# 导入word或excel文档代码

//说明下 enableeventvalidation="false"的使用:     //在页面上添加了输入型服务器控件时(如 textbox),就需要设置为false了,否则会报错:也就是关闭页面验证,默认是开启的. //就是这个样子 <%@ page language="c#" enableeventvalidation="false" autoeventwireup="true" codefile="d

如何用ASP创建Word与Excel文档

创建|word|excel 怎样通过ASP创建简易的OFFICE文档呢?快捷的生成word或excel文档进行办公应用处理!下面我们来详细讲解. ASP具备动态输出任一Office应用程序文件格式的功能.在开始编写代码之前,我们首先需要做的就是设置正确的文件类型,因为浏览器需要知道如何处理文件.第二步是编辑文件名称,我们可以使用HTML和CSS来创建Word文档或Excel文档的样式.      下面这段例子代码可用于在线创建Word文档. 以下是代码:<% Response.ContentTy