展开全部
这段代码可以搞定，不过只能在IE浏览器下。
<!DOCTYPE html>
<html>
<head>
<title>New Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
</head>
<body>
<form id="form">
<table id = "PrintA" width="100%" border="1" cellspacing="0" cellpadding="0" >
<tr style="text-align : center;">
<td>单元格1</td>
<td>单元格2</td>
<td>单元格3</td>
<td>单元格4</td>
</tr>
<tr>
<td colSpan=4 style="text-align : center;"><font color="red" face="Verdana">单元格合并</FONT></td>
</tr>
</table>
<BR>
<table id = "Test" width="100%">
<tr>
<td><font color="red">test</FONT></td>
</tr>
</table>
</form>
<input type="button" onclick="javascript:MakeWord();" value="导出页面到Word">
<script type="text/javascript">
function MakeWord()
{
var word = new ActiveXObject("Word.Application");
// var doc = word .documents.open("c:\test.doc"); //此处为打开已有的模版
var doc = word .Documents.Add("",0,1);//不打开模版直接加入内容
var Range=doc.Range();
var sel = document.body.createTextrange();
sel.moveToElementText(form);//此处form是页面form的id
sel.select();
sel.execCommand("Copy");
Range.Paste();
word .Application.Visible = true;
doc .saveAs("c:\\ba.doc"); //存放到指定的位置注意路径一定要是“\\”不然会报错
}
</script>
</body></html>
<script type="text/javascript">
function word()
{
word=new ActiveXObject('word.application');
word.Application.Visible=trUE;
var doc=word.Documents.Add('',0,1);
range=doc.range(0,1);
var sel=Layer1.document.body.createTextrange();
Layer1.document.execCommand('Copy');
sel.moveEnd('character');
range.Paste();
location.reload();
word.ActiveWindow.ActivePane.view.Type=3; //默认为页面视图
}
</script>
<div id="Layer1"><input type="button" name="button" value="生成word" onclick="word();"></div>
<!DOCTYPE html>
<html>
<head>
<title>New Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
</head>
<body>
<form id="form">
<table id = "PrintA" width="100%" border="1" cellspacing="0" cellpadding="0" >
<tr style="text-align : center;">
<td>单元格1</td>
<td>单元格2</td>
<td>单元格3</td>
<td>单元格4</td>
</tr>
<tr>
<td colSpan=4 style="text-align : center;"><font color="red" face="Verdana">单元格合并</FONT></td>
</tr>
</table>
<BR>
<table id = "Test" width="100%">
<tr>
<td><font color="red">test</FONT></td>
</tr>
</table>
</form>
<input type="button" onclick="javascript:MakeWord();" value="导出页面到Word">
<script type="text/javascript">
function MakeWord()
{
var word = new ActiveXObject("Word.Application");
// var doc = word .documents.open("c:\test.doc"); //此处为打开已有的模版
var doc = word .Documents.Add("",0,1);//不打开模版直接加入内容
var Range=doc.Range();
var sel = document.body.createTextrange();
sel.moveToElementText(form);//此处form是页面form的id
sel.select();
sel.execCommand("Copy");
Range.Paste();
word .Application.Visible = true;
doc .saveAs("c:\\ba.doc"); //存放到指定的位置注意路径一定要是“\\”不然会报错
}
</script>
</body></html>
<script type="text/javascript">
function word()
{
word=new ActiveXObject('word.application');
word.Application.Visible=trUE;
var doc=word.Documents.Add('',0,1);
range=doc.range(0,1);
var sel=Layer1.document.body.createTextrange();
Layer1.document.execCommand('Copy');
sel.moveEnd('character');
range.Paste();
location.reload();
word.ActiveWindow.ActivePane.view.Type=3; //默认为页面视图
}
</script>
<div id="Layer1"><input type="button" name="button" value="生成word" onclick="word();"></div>
追问
这位朋友你好，你的代码我有些看不懂，我试了下有点问题，就是我直接把代码复制，写成一个html页面，单击按钮没有反应···能帮我看下么？谢谢了···
追答
这个代码我亲手测试过的，没有问题。
不过只能在IE下使用，且用到windows浏览器的activex控件，你需要允许这个控件使用（就像第一次打开淘宝登录页面时，提示的控件一样，不过这个控件不需要安装，只需要“允许使用”就可以了）。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
<input type=button value=下载 onclick="window.location.href='网址'"></input>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
这个恐怕不行，除非别人已经将此内容做成了word供你下载
更多追问追答
追问
如果是做成Wrod了呢？怎么下载？
追答
是你自己做，还是下载别人的，下载别人的，直接单击那个下载按钮，自己做的话，要加一段代码
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
这个链接的地址直接指向word文档就行了！~
追问
你的意思是？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（2）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
