在WORD文档中高亮显示关键词

sd5816690 2010-07-31 10:40:46
如题,上面让做个功能,让关键词在指定的WORD文档中高亮显示

我知道用 Word.Application 可以插入内容,替换内容,但高亮怎么弄。。
改变背景颜色?怎么改?

下面附上插入和替换的代码
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>HighLight</title>
</head>
<script language="javascript">
function highlight(){
var wdapp = null;
try {
wdapp = new ActiveXObject ("Word.Application");
wdapp.visible = true;
} catch(e) {
alert('不支持 ActiveXObject');
return false;
}

var path = "c:/test.doc";
var wddoc = wdapp.documents.open(path);

// 插入
var range = wddoc.range(3, 10);
range.insertbefore('hello world!');

// 插入网页内容
var sel = div1.document.body.createTextRange();
sel.select();
div1.document.execCommand('Copy');
sel.moveEnd('character');
wdapp.selection.Paste();

// 替换
var keyword = "[title]";
var newstr = "这是标题";
wdapp.selection.find.execute(keyword, false, false, false, false, false, true, 1, true, newstr, 2);
}
</script>
<body>
<div id="div1">
<label style="background-color:yellow;">新内容</label>
</div>
<input type="button" name="submit" value="按钮" onclick="highlight()">
</body>
</html>
...全文
698 8 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
shiyicai 2011-11-03
  • 打赏
  • 举报
回复
神仙找你急事,请加我QQ182517061,是关于你这个帖子的回复的!http://topic.csdn.net/u/20080701/11/DE814029-0D5A-4A35-AE61-DA6D1F6ECFE4.html
hoojo 2010-08-02
  • 打赏
  • 举报
回复
参考下,不知道有木有用:http://apps.hi.baidu.com/share/detail/6612136
sd5816690 2010-08-02
  • 打赏
  • 举报
回复
顶!
下午结贴。
zoujp_xyz 2010-07-31
  • 打赏
  • 举报
回复
sd5816690 2010-07-31
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 zoujp_xyz 的回复:]
try
sel.Font.Color= "#ff0000"
[/Quote]
'Font'为空或不是对象

能给出完整代码吗?
对 Word.Application 实在不熟悉

最好改背景颜色,字体颜色也能凑合
zoujp_xyz 2010-07-31
  • 打赏
  • 举报
回复
try
sel.Font.Color= "#ff0000"
sd5816690 2010-07-31
  • 打赏
  • 举报
回复
传说晚上有高手出没
顶一下,我在4楼碰到的问题能否解决

解决不了,明天再顶,后天再顶,再解决不了就结贴了
sd5816690 2010-07-31
  • 打赏
  • 举报
回复
挣扎了几小时,效果是出来了。。。
但。。。唉。。。是一个一个替换的,求解决办法
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>HighLight</title>
</head>
<script language="javascript">
function highlight(keyword){
var wdapp = null;
try {
wdapp = new ActiveXObject ("Word.Application");
wdapp.visible = true;
} catch(e) {
alert('不支持 ActiveXObject 或未安装 WORD');
return false;
}

var path = "c:/test.doc";
var wddoc = wdapp.documents.open(path);

wdapp.Selection.Find.Text = keyword;
while(wdapp.Selection.Find.Execute()){
wdapp.Selection.Range.Shading.BackgroundPatternColorIndex = 6;
}

}
</script>
<body>
<input type="button" name="submit" value="按钮" onclick="highlight('[title]')">
</body>
</html>

87,997

社区成员

发帖
与我相关
我的任务
社区描述
Web 开发 JavaScript
社区管理员
  • JavaScript
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧