网页上内容导出到word里- Javascript - 软晨网（RuanChen.com）

技术文章搜索

关键字

Javascript 中的网页上内容导出到word里

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-10 浏览: 505 ::

收藏到网摘: n/a

JScript中正则表达函数的说明与应用关于开发在线网页编辑器按回车会输入<p>而不是<br>的解决方法

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网页上内容导出到word</title>
</head>
<body>
<div id="Layer1" >Happy New Year ! ! !
<input type=button name='button_export' title='导出到word' onclick=OpenWord() value=下载到word></div>
</div>

<p>this is a test!</p>
<table align="center" width="300" border="1" bordercolor="#2baeff" cellpadding="0" cellspacing="0" bgcolor="lightblue">
<Tr><Td>1</td><Td>2</td><Td>3</td></tr>
<Tr><Td>4</td><Td>5</td><Td>6</td></tr>
<Tr><Td>7</td><Td>8</td><Td>9</td></tr>
</table>
</body>
</html>
<script language="javascript">
function OpenWord(){
Layer1.style.border=0
ExcelSheet = new ActiveXObject('Word.Application');
ExcelSheet.Application.Visible = true;
var mydoc=ExcelSheet.Documents.Add('',0,1);
myRange =mydoc.Range(0,1)
var sel=Layer1.document.body.createTextRange()
sel.select()
Layer1.document.execCommand('Copy')
sel.moveEnd('character')
myRange.Paste();
location.reload()
ExcelSheet.ActiveWindow.ActivePane.View.Type=9
}
</script>

JScript中正则表达函数的说明与应用关于开发在线网页编辑器按回车会输入<p>而不是<br>的解决方法

Javascript 中的 网页上内容导出到word里

评论 (0) All

Javascript 中的网页上内容导出到word里