iWebOffice2004调用VBA脚本解释及翻译

作者: 来源:网络文章时间:2005-12-13 22:18:30

iWebOffice2004调用VBA脚本解释及翻译(16) if (webform.WebOffice.ActiveDocument.CommandBars(ToolName).Controls(i).id==ToolIndex){
      webform.WebOffice.ActiveDocument.CommandBars(ToolName).Controls(i).Enabled = Enable;
  break;
}
    }
}catch(e){}
}

//设置是否保护
function WebProtect(value){
try{
    if (value){
if (webform.WebOffice.FileType==".doc"){
       webform.WebOffice.ActiveDocument.Protect(2);
}else if(webform.WebOffice.FileType=='.xls'){
            for (var mIndex=1;mIndex<=webform.WebOffice.ActiveDocument.Application.ActiveWorkbook.Sheets.Count;mIndex++){
                var mSheet=webform.WebOffice.ActiveDocument.Application.ActiveWorkbook.Sheets(mIndex);
                mSheet.Protect("", true, true, true);
            }
}
    }else{
if (webform.WebOffice.FileType==".doc"){
  webform.WebOffice.ActiveDocument.UnProtect();
}else if(webform.WebOffice.FileType=='.xls'){
            for (var mIndex=1;mIndex<=webform.WebOffice.ActiveDocument.Application.ActiveWorkbook.Sheets.Count;mIndex++){
                var mSheet=webform.WebOffice.ActiveDocument.Application.ActiveWorkbook.Sheets(mIndex);
                mSheet.UnProtect("");
            }
}

}
}catch(e){}
}

//取得Word内容

共34页 9 7 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] [22] [23] [24] [25] [26] [27] [28] [29] [30] [31] [32] [33] [34] 8 :>

iWebOffice2004调用VBA脚本解释及翻译相关文章：

iWebOffice2004调用VBA脚本解释及翻译相关软件：

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。
转载请注明来源：http://www.xgdown.com