网页转换成Word

主函数方法

function OpenWord(){
Layer1.style.border=0;
word = new ActiveXObject('Word.Application');
word.Application.Visible = true;
var mydoc=word.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();
//word.ActiveWindow.ActivePane.View.Type=9;
}

页面调用

<div id="Layer1" >
<input type=button name='button_export' title='导出到word' onclick="OpenWord()" value="导出到word"></div>
</div>