本技术资料版权所有,禁止分发.©(2003-2007),重庆软航科技有限公司,保留所有权利.NTKO和软航是软航科技的商标

NTKO OFFICE文档控件技术资料

套红套错,换另一个模板套红怎么实现


创建时间:03/08/2013 03:56:34 PM 修改时间: 03/15/2013 04:42:48 PM
分类:BS开发-常见问题, BS客户端-JavaScript控制Word
适应版本号:4,0,6,X; 4,0,3,X; 4,0,1,X; 4,0,0,X

相关文档:本文档没有相关文档

问题表现:

我在套红时是将正文套到模板中的,但是如果套错了,我想删除之前的模板套红,换另一个模板套红怎么实现呢?
解决方案:
function TANGER_OCX_DoPaiBan1()
{
try{
//选择对象当前文档的所有内容
var bookMarkName ;
var value;
var bk = TANGER_OCX_OBJ.ActiveDocument.Bookmarks;
if(bk.Exists("zhengwen"))
{

            TANGER_OCX_OBJ.ActiveDocument.Application.Selection.GoTo(-1,0,0,"zhengwen");
            var mark = TANGER_OCX_OBJ.ActiveDocument.Bookmarks("zhengwen");
var range = mark.Range;
range.Cut();
            TANGER_OCX_OBJ.ActiveDocument.Application.Selection.HomeKey(6);//光标定位到文件头
            var curSel = TANGER_OCX_OBJ.ActiveDocument.Application.Selection;
curSel.WholeStory();
curSel.Delete();
            TANGER_OCX_OBJ.AddTemplateFromURL("/FileUploadTest/tempDirectory/test.doc");
}
else
{
alert("vvv");
              var curSel = TANGER_OCX_OBJ.ActiveDocument.Application.Selection;
curSel.WholeStory();
curSel.Cut();
              //插入模板TANGER_OCX_OBJ.AddTemplateFromURL("/FileUploadTest/tempDirectory/noD.doc");
}
            var bkmkObj = TANGER_OCX_OBJ.ActiveDocument.BookMarks("zhengwen");
var saverange = bkmkObj.Range;
            saverange.Paste(); TANGER_OCX_OBJ.ActiveDocument.Bookmarks.Add("zhengwen",saverange);
}
catch(err)
{
//alert("错误:" + err.number + ":" + err.description);
}
}

返回页面顶部↑  
本文档的相关文档:
本文档没有相关文档