|
iWebOffice2004调用VBA脚本解释及翻译(7) mObject.Result=false;
window.showModalDialog(mDialogUrl, mObject, "dialogHeight:200px; dialogWidth:360px;center:yes;scroll:no;status:no;");
//如果用户确认选择
if (mObject.Result){
//清除所有设置文本信息
webform.WebOffice.WebMsgTextClear();
//设置COMMAND为SAVEVERSION
webform.WebOffice.WebSetMsgByName("COMMAND","SAVEVERSION");
//设置描述信息内容
webform.WebOffice.WebSetMsgByName("DESCRIPT",mObject.Descript);
//保存当前版本
webform.WebOffice.Save(gFileName,true);
//调入该文档
webform.WebOffice.WebMsgFileLoad(gFileName);
//发送到服务器上
webform.WebOffice.WebSendMessage();
if (webform.WebOffice.Error!=""){
alert(webform.WebOffice.Error);
}
}
StatusMsg(webform.WebOffice.Status);
} //用数据库中的内容填充标签里的内容
function LoadBookmarks(){
var mCount,mIndex;
var mBookObject,mBookName,mBookIdx;
//清除所有设置变量信息
webform.WebOffice.WebMsgTextClear();
//设置COMMAND为LOADBOOKMARKS
webform.WebOffice.WebSetMsgByName("COMMAND","LOADBOOKMARKS");
//发送信息到服务器上
webform.WebOffice.WebSendMessage();
//如果没有错误信息
|
