webeditor1.js

sms开发主要用于短信平台开发与应用45445倒萨啊打12221答案的第

}
//调用打开图片对话框
function OpenPicture(){
   try{
	if (webform.WebOffice.FileType==".doc"){
	  //如果是Word
	  webform.WebOffice.ActiveDocument.Application.Dialogs(163).Show();
	}else{
          //如果是Excel
	  webform.WebOffice.ActiveDocument.Application.Dialogs(342).Show();
	}
   }catch(e){

   }
}

//电子印章功能
function OpenSignature(){
  var mDialogUrl = "http://dragongod.vicp.net:8080/WebEditor/Signature/SignatureForm.jsp";
  var mMarkName,mPassWord,mMarkTime;
  var mObject = new Object();
      mObject.MarkName = "";
      mObject.PassWord = "";
      window.showModalDialog(mDialogUrl, mObject, "dialogHeight:200px; dialogWidth:360px;center:yes;scroll:no;status:no;"); 
  //判断用户是否选择印章名称和密码
  if (mObject.MarkName==""||mObject.PassWord==null){
    StatusMsg("取消印章");
    return false;
  }else{
     //取得系统文件目录
     var mFilePath=webform.WebOffice.MsgFilepath;
     var mImgShape=null;
     var mLabName=null;
     var mZOrder=null;
     mMarkName=mObject.MarkName;
     mPassWord=mObject.PassWord;
     //清除所有设置的变量 
     webform.WebOffice.MsgTextClear();
     //设置印章名称
     webform.WebOffice.SetMsgByName("IMAGENAME",mMarkName);
     //设置印章密码
     webform.WebOffice.SetMsgByName("PASSWORD",mPassWord);
     //发送到服务器上
     webform.WebOffice.SendToServer("LOADMARKIMAGE");
     //如果没有错误
     if (webform.WebOffice.Error==""){
       //取得服务器返回时间
       mMarkTime=webform.WebOffice.GetMsgByName("DATETIME");
       //取得印章所盖的位置，POSITION所指的是标签的对象名
       mLabName=webform.WebOffice.GetMsgByName("POSITION");
       //设置印章的显示形式，4是在文字上方，5是在文字下方
       mZOrder=webform.WebOffice.GetMsgByName("ZORDER");
       //取得完整的印章图片名称 
       var mFileName=webform.WebOffice.GetMsgByName("IMAGENAME");
       //保存该印章
       webform.WebOffice.MsgFileSave(mFilePath+mFileName);
       //如果一切正常
       if (webform.WebOffice.Error==""){
         //如果是word文件 
         if (webform.WebOffice.FileType==".doc"){
           var mInlineShapes=null; 
           var mBookMark=FindBookmarks(mLabName);
           if (mBookMark){
              mInlineShapes=mBookMark.InlineShapes.AddPicture(mFilePath+mFileName);
           }else{
              mInlineShapes=webform.WebOffice.ActiveDocument.Application.Selection.InlineShapes.AddPicture(mFilePath+mFileName);
           }  
          
          mImgShape = mInlineShapes.ConvertToShape();
          mImgShape.Select();
          mImgShape.AlternativeText="DBSTEP_2004=印章名称:["+mMarkName+"] 用户名称:["+webform.WebOffice.UserName+"] 盖章时间[:"+mMarkTime+"] 印章编号:["+webform.WebOffice.RecordID+"]";
          mImgShape.PictureFormat.TransparentBackground = true;
          mImgShape.PictureFormat.TransparencyColor = 16777215;
          mImgShape.Fill.Visible = false;
          mImgShape.WrapFormat.Type = 3;
          mImgShape.ZOrder(mZOrder);
        }
        //如果是Excel文件
        if (webform.WebOffice.FileType==".xls"){
  	  webform.WebOffice.ActiveDocument.ActiveSheet.Pictures.Insert(mFilePath+mFileName).Select();
	  mImgShape =webform.WebOffice.ActiveDocument.Application.Selection.ShapeRange;
          mImgShape.AlternativeText="DBSTEP_2004=印章名称:["+mMarkName+"] 用户名称:["+webform.WebOffice.UserName+"] 盖章时间[:"+mMarkTime+"] 印章编号:["+webform.WebOffice.RecordID+"]";
          mImgShape.PictureFormat.TransparentBackground = true;
          mImgShape.PictureFormat.TransparencyColor = 16777215;
          mImgShape.Fill.Visible = false;
          mImgShape.ZOrder(mZOrder);
        } 
       }  
       //清除印章文件
       webform.WebOffice.MsgFileClear(mFilePath+mFileName);
    }else{
      alert(webform.WebOffice.Error);
    }
    StatusMsg(webform.WebOffice.Error);
  }
}


//显示印章信息
function ShowSignature(){
  var SignatureString="";
  try{
    //如果是word文件
    if (webform.WebOffice.FileType==".doc"){
      for (var mIndex=1;mIndex<=webform.WebOffice.ActiveDocument.Shapes.Count;mIndex++){
        var mValidString=webform.WebOffice.ActiveDocument.Shapes.Item(mIndex).AlternativeText;
        if ((mValidString!=null)&&(mValidString.length!=0)){
            if ((mValidString.indexOf("DBSTEP_2004")!=-1) && (mValidString.indexOf(webform.WebOffice.RecordID)!=-1)){
		SignatureString=SignatureString+"\r\n"+mValidString.substring(12,mValidString.length);
	    } 
        }
      }
    }
    //如果是Excel文件
    if (webform.WebOffice.FileType==".xls"){
      for (var mSheet=1;mSheet<=webform.WebOffice.ActiveDocument.Application.Sheets.Count;mSheet++){
        webform.WebOffice.ActiveDocument.Application.Sheets(mSheet).Select();
        for (var mIndex=1;mIndex<=webform.WebOffice.ActiveDocument.ActiveSheet.Shapes.Count;mIndex++){
	  var mValidString=webform.WebOffice.ActiveDocument.ActiveSheet.Shapes.Item(mIndex).AlternativeText;
          if ((mValidString!=null)&&(mValidString.length!=0)){
              if ((mValidString.indexOf("DBSTEP_2004")!=-1) && (mValidString.indexOf(webform.WebOffice.RecordID)!=-1)){
		  SignatureString=SignatureString+"\r\n"+mValidString.substring(12,mValidString.length);
	      } 
          }
        }
      }
    }

    if (SignatureString){
       alert("印章列表如下:"+SignatureString);
    }else{
       alert("没有找到任何有效印章");
    }
  }catch(e){}
}


//是否显示工具栏
function ToolBars(Visible){
  try{
     webform.WebOffice.ToolBars=Visible; 
  }catch(e){}
}
//是否显示菜单栏
function MenuBar(Visible){
  try{
     webform.WebOffice.MenuBar=Visible; 
  }catch(e){}
}

//是否显示某种工具栏
function ToolsVisible(ToolName,Visible){
  try{
    webform.WebOffice.ActiveDocument.CommandBars(ToolName).Visible = Visible;
  }catch(e){}
}

//是否允许某工具栏上的某工具有效
function ToolsEnable(ToolName,ToolIndex,Enable){
 var i;
 try{
    for (i=1;i<=webform.WebOffice.ActiveDocument.CommandBars(ToolName).Controls.Count;i++){
	if  (webform.WebOffice.ActiveDocument.CommandBars(ToolName).Controls(i).id==ToolIndex){
    		webform.WebOffice.ActiveDocument.CommandBars(ToolName).Controls(i).Enabled = Enable;
		break;
	}
    }
 }catch(e){}
}

//设置是否保护
function Protect(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内容
function GetWordContent(){
  try{
    alert(webform.WebOffice.ActiveDocument.Content.Text);
  }catch(e){}
}

//插入Word内容
function SetWordContent(){
  var mText=window.prompt("请输入内容:","测试内容");
  if (mText==null){
     return (false);
  }
  else
  {
     //下面为显示选中的文本
     //alert(webform.WebOffice.ActiveDocument.Application.Selection.Range.Text);
     //下面为在当前光标出插入文本
     webform.WebOffice.ActiveDocument.Application.Selection.Range.InsertAfter (mText+"\n");
     //下面为在第一段后插入文本
     //webform.WebOffice.ActiveDocument.Application.ActiveDocument.Range(1).InsertAfter(mText);
  }
}

//设置并取得Excel的内容
function GetExcelContent(){
    webform.WebOffice.ActiveDocument.Application.Sheets(1).Select;
    webform.WebOffice.ActiveDocument.Application.Range("C5").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "126";
    webform.WebOffice.ActiveDocument.Application.Range("C6").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "446";
    webform.WebOffice.ActiveDocument.Application.Range("C7").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "556";
    webform.WebOffice.ActiveDocument.Application.Range("C5:C8").Select;
    webform.WebOffice.ActiveDocument.Application.Range("C8").Activate;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "=SUM(R[-3]C:R[-1]C)";
    webform.WebOffice.ActiveDocument.Application.Range("D8").Select;
    alert(webform.WebOffice.ActiveDocument.Application.Range("C8").Text);
}

//设置Excel页，并演示锁定相应栏目
function SheetsLock(){
    webform.WebOffice.ActiveDocument.Application.Sheets(1).Select;

    webform.WebOffice.ActiveDocument.Application.Range("A1").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "产品";
    webform.WebOffice.ActiveDocument.Application.Range("B1").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "价格";
    webform.WebOffice.ActiveDocument.Application.Range("C1").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "详细说明";
    webform.WebOffice.ActiveDocument.Application.Range("D1").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "库存";
    webform.WebOffice.ActiveDocument.Application.Range("A2").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "书签";
    webform.WebOffice.ActiveDocument.Application.Range("A3").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "毛笔";
    webform.WebOffice.ActiveDocument.Application.Range("A4").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "钢笔";
    webform.WebOffice.ActiveDocument.Application.Range("A5").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "尺子";

    webform.WebOffice.ActiveDocument.Application.Range("B2").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "0.5";
    webform.WebOffice.ActiveDocument.Application.Range("C2").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "樱花";
    webform.WebOffice.ActiveDocument.Application.Range("D2").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "300";

    webform.WebOffice.ActiveDocument.Application.Range("B3").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "2";
    webform.WebOffice.ActiveDocument.Application.Range("C3").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "狼毫";
    webform.WebOffice.ActiveDocument.Application.Range("D3").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "50";

    webform.WebOffice.ActiveDocument.Application.Range("B4").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "3";
    webform.WebOffice.ActiveDocument.Application.Range("C4").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "蓝色";
    webform.WebOffice.ActiveDocument.Application.Range("D4").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "90";

    webform.WebOffice.ActiveDocument.Application.Range("B5").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "1";
    webform.WebOffice.ActiveDocument.Application.Range("C5").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "20cm";
    webform.WebOffice.ActiveDocument.Application.Range("D5").Select;
    webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "40";

    //保护工作表
    webform.WebOffice.ActiveDocument.Application.Range("B2:D5").Select;
    webform.WebOffice.ActiveDocument.Application.Selection.Locked = false;
    webform.WebOffice.ActiveDocument.Application.Selection.FormulaHidden = false;
    webform.WebOffice.ActiveDocument.Application.ActiveSheet.Protect(true,true,true);   

    alert("已经保护工作表，只有B2-D5单元格可以修改。");
}

//VBA套红操作
function InsertVBA(){
	
	//画线
	var object=webform.WebOffice.ActiveDocument;
	var myl=object.Shapes.AddLine(100,60,305,60)
	myl.Line.ForeColor=255;
	myl.Line.Weight=2;
	var myl1=object.Shapes.AddLine(326,60,520,60)
	myl1.Line.ForeColor=255;
	myl1.Line.Weight=2;

	//object.Shapes.AddLine(200,200,450,200).Line.ForeColor=6;
   	var myRange=webform.WebOffice.ActiveDocument.Range(0,0);
	myRange.Select();

	var mtext="★";
	webform.WebOffice.ActiveDocument.Application.Selection.Range.InsertAfter (mtext+"\n");
   	var myRange=webform.WebOffice.ActiveDocument.Paragraphs(1).Range;
   	myRange.ParagraphFormat.LineSpacingRule =1.5;
   	myRange.font.ColorIndex=6;
   	myRange.ParagraphFormat.Alignment=1;
   	myRange=webform.WebOffice.ActiveDocument.Range(0,0);
	myRange.Select();
	mtext="帝龙科技发[２００３]１５４号";
	webform.WebOffice.ActiveDocument.Application.Selection.Range.InsertAfter (mtext+"\n");
	myRange=webform.WebOffice.ActiveDocument.Paragraphs(1).Range;