iWebOffice2004调用VBA脚本解释及翻译(26) //设置需要调用的模版名称 webform.WebOffice.WebSetMsgByName("TEMPNAME","模板一.doc"); //发送该信息到服务器上 webform.WebOffice.WebSendMessage(); //如果没有错误 if (webform.WebOffice.Error==""){ //关闭当前文件 webform.WebOffice.Close(); //保存模版文件 webform.WebOffice.WebMsgFileSave(gFileName); //如果没有错误 if (webform.WebOffice.Error==""){ //打开模版文件 webform.WebOffice.Open(gFileName,true); //查找需要插入的位置(标签) var mPosition=webform.WebOffice.WebGetMsgByName('POSITION'); if (mPosition.length>0){ mBookRange = WebFindBookmarks(mPosition); }else{ mBookRange = webform.WebOffice.ActiveDocument.Range.Application.Selection; } //将原工作文档插入到该位置 mBookRange.InsertFile(mFilePath+mFileName); }