导出到word

<html>  
<head>  
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">  
<title>网页上内容导出到word</title>  
<script language="javascript">  
function OpenWord(){   
  
        ExcelSheet = new ActiveXObject('word.Application');   
    ExcelSheet.Application.Visible = true;   
    var orgNum=ExcelSheet.Documents.Add('',0,1);   
        myRange =orgNum.Range(0,1)   
        sel=parent.document.body.createTextRange();   
    oTblExport = parent.document.getElementById("Layer1");   
    if (oTblExport != null) {   
        sel.moveToElementText(oTblExport);   
        sel.execCommand('Copy');   
        parent.document.body.blur();   
        myRange.Paste();   
    }   
         
}   
</SCRIPT>  
</head>  
<body>  
<div id="Layer1" >Happy New Year ! ! !   
<p>3.5版本新特性:</p>
<table border="1" bordercolor="#cccccc" cellpadding="5" width="90%">
<tbody>
<tr>
<td>表格编辑</td>
<td>多语言支持</td>
<td>更漂亮的外观</td>
</tr>
<tr>
<td>回显字体和颜色</td>
<td>表情分页和预览</td>
<td>新API</td>
</tr>
</tbody>
</table>
<img border="0" alt="" src="http://www.cnbeta.com/images/cnlogo.gif" />
<input type=button name='button_export' title='导出到word'  οnclick=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>  

 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值