开发学院网页设计 JavaScript JavaScript导出Word后对Word分页的处理阅读

JavaScript导出Word后对Word分页的处理

　2010-09-14 13:30:52　来源：WEB开发网　　　

核心提示：需求是这样的,导出html指定元素内容为word,并按指定关键字分页.网上找了半天只有保存为word的方法.在csdn上向专家提了问,没人回啊555.蹒跚学步开始了.对于分页,自己用vba录制了命令,然后用JavaScript调试出来的.直接看代码:<html><HEAD><title&g

需求是这样的,导出html指定元素内容为word,并按指定关键字分页.

网上找了半天只有保存为word的方法.在csdn上向专家提了问,没人回啊555.

蹒跚学步开始了.

对于分页,自己用vba录制了

命令,然后用JavaScript调试出来的.

直接看代码:

<html> 　　<HEAD> 　　　　<title>WEB页面导出为Word文档后分页的方法 </title> 　　</HEAD> 　　<SCRIPT LANGUAGE="javascript"> 　　　　　　　　/**//* 　　　　　　　　 * 　　　　　　　　 * @param {Object} cont　要导出的html元素内容的id,注意不要加双引号　　　　　　　　 * @param {Object} key　分页关键字　　　　　　　　 */ 　　　　　　　　function AllAreaWord(cont,key) 　　　　　　　　{ 　　　　　　　　　　var oWD = new ActiveXObject("Word.Application"); 　　　　　　　　　　//默认为页面视图　　　　　　　　　　var oDC = oWD.Documents.Add("", 0, 0); 　　　　　　　　　　var oRange = oDC.Range(0, 1); 　　　　　　　　　　//var oRange1 = oDC.Range(0,2); 　　　　　　　　　　var sel = document.body.createTextRange(); 　　　　　　　　　　//参数为html元素id 　　　　　　　　　　sel.moveToElementText(cont); 　　　　　　　　　　sel.select(); 　　　　　　　　　　sel.execCommand("Copy"); 　　　　　　　　　　oRange.Paste(); 　　　　　　　　　　oWD.Application.Visible = true; 　　　　　　　　　　//得到打开后word的selection对象　　　　　　　　　　var selection = oWD.Selection; 　　　　　　　　　　//设置字体大小　　　　　　　　　　selection.Font.Size = 10; 　　　　　　　　　　//ctrl+A 全选操作　　　　　　　　　　selection.WholeStory(); 　　　　　　　　　　//清除格式　　　　　　　　　　selection.Find.ClearFormatting(); 　　　　　　　　　　//指定查找关键字　　　　　　　　　　selection.Find.Text = key; 　　　　　　　　　　//^m为手动分页符标记　　　　　　　　　　//向下查找　　　　　　　　　　selection.Find.Forward = true; 　　　　　　　　　　selection.Find.Wrap = 1; 　　　　　　　　　　//不区分大小写　　　　　　　　　　selection.Find.MatchCase = false; 　　　　　　　　　　//不匹配整个单词　　　　　　　　　　selection.Find.MatchWholeWord = false; 　　　　　　　　　　//如果找到指定字符串返回真,否则返回false 　　　　　　　　　　while (selection.Find.Execute()) 　　　　　　　　　　{ 　　　　　　　　　　　　//插入分页符,分页符常量为7,具体可查word api 　　　　　　　　　　　　selection.InsertBreak(7); 　　　　　　　　　　} 　　　　　　　　} 　　</SCRIPT> 　　<body> 　　　　<BR> 　　　　<div id="test"> 　　　　　　aaa 　　　　　　^ 　　　　　　bbb 　　　　　　^ 　　　　　　ccc 　　　　</div> 　　　　<input type="button" onclick="javascript:AllAreaWord(test,'^');" value="导出页面指定区域内容到Word"/> 　　</body> </html>