开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 中间件编程 > 查看源码
DocumentEdit.aspx
资源名称：iWebOffice2006.ocx.c.net.rar　[点击查看]
上传用户：hbbfjy2008
上传日期：2015-02-05
资源大小：5616k
文件大小：40k
源码类别：

中间件编程

开发平台：

C#

DocumentEdit.aspx：源码内容
  1. <%@ Page language="c#" Codebehind="DocumentEdit.aspx.cs" AutoEventWireup="false" Inherits="iWebOffice.ocx.c.net.DocumentEdit" %>
  2. <html>
  3. <head>
  4. <title>金格科技-iWebOffice2006全文批注实例</title>
  5. <link rel='stylesheet' type='text/css' href='test.css'>
  6. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  7. <script language="javascript" for=WebOffice event="OnMenuClick(vIndex,vCaption)">
  9.    if (vIndex==1){  //打开本地文件
  10.       WebOpenLocal();
  11.    }
  12.    if (vIndex==2){  //保存本地文件
  13.       WebSaveLocal();
  14.    }
  15.    if (vIndex==3){  //保存到服务器上
  16.       SaveDocument();    //保存正文
  17.    }
  18.    if (vIndex==5){  //签名印章
  19.       WebOpenSignature();
  20.    }
  21.    if (vIndex==6){  //验证签章
  22.       WebShowSignature();
  23.    }
  24.    if (vIndex==8){  //保存版本
  25.       WebSaveVersion();
  26.    }
  27.    if (vIndex==9){  //打开版本
  28.       WebOpenVersion();
  29.    }
  30.    if (vIndex==11){  //测试菜单一
  31.      alert('菜单编号:'+vIndex+'nr'+'菜单条目:'+vCaption+'nr'+'请根据这些信息编写菜单具体功能');
  32.    }
  33.    if (vIndex==12){  //测试菜单二
  34.      alert('菜单编号:'+vIndex+'nr'+'菜单条目:'+vCaption+'nr'+'请根据这些信息编写菜单具体功能');
  35.    }
  36.    if (vIndex==14){  //保存并退出
  37.      SaveDocument();    //保存正文
  38.      webform.submit();
  39.    }
  40.    if (vIndex==16){  //打印文档
  41.       WebOpenPrint();
  42.    }
  43.    if (vIndex==17){  //隐藏手写批注
  44.       webform.WebOffice.VisibleTools('手写批注',false);   //隐藏或显示iWebOffice工具栏 true显示  false隐藏
  45.    }
  46.    if (vIndex==18){  //显示手写批注
  47.       webform.WebOffice.VisibleTools('手写批注',true);   //隐藏或显示iWebOffice工具栏 true显示  false隐藏
  48.    }
  50. </script>
  52. <SCRIPT language=javascript for=WebOffice event=OnToolsClick(vIndex,vCaption)>
  53.     //响应工具栏事件
  54.     if (vIndex==11){alert('编号:'+vIndex+'nr'+'标题:'+vCaption+'nr'+'请根据这些信息编写具体功能'+'nrnr'+'窗口状态:'+webform.WebOffice.WindowStatus);} 
  55.     if (vIndex==12){webform.WebOffice.Alert('自定义工具栏测试');}  
  56.     //if (vIndex==-1){webform.WebOffice.Alert(vCaption);}             //在完成相应操作后响应iWebOffice标准工具栏操作铵钮事件，如"手写批注",vCaption="手写批注"
  57. </SCRIPT>
  59. <script language=javascript>
  60. /*
  61. form表单名称:webform
  62. iWebOffice名称:WebOffice
  63. WebObject文档对象接口，相当于：
  64. 如果是Word  文件，WebObject 是Word  VBA的ActiveDocument对象
  65. 如果是Excel 文件，WebObject 是Excel VBA的ActiveSheet对象
  67. 如：webform.WebOffice.WebObject
  68. */
  71. //作用：显示操作状态
  72. function StatusMsg(mString){
  73.   StatusBar.innerText=mString;
  74. }
  76. //作用：载入iWebOffice
  77. function Load(){
  78.   try{
  79.     //以下属性必须设置，实始化iWebOffice
  80.     webform.WebOffice.WebUrl="<%=mServerUrl%>"; //WebUrl:系统服务器路径，与服务器文件交互操作，如保存、打开文档，重要文件
  81.     webform.WebOffice.RecordID="<%=mRecordID%>"; //RecordID:本文档记录编号
  82.     webform.WebOffice.Template="<%=mTemplate%>"; //Template:模板编号
  83.     webform.WebOffice.FileName="<%=mFileName%>"; //FileName:文档名称
  84.     webform.WebOffice.FileType="<%=mFileType%>"; //FileType:文档类型  .doc  .xls  .wps
  85.     webform.WebOffice.UserName="<%=mUserName%>"; //UserName:操作用户名，痕迹保留需要
  86.     webform.WebOffice.EditType="<%=mEditType%>"; //EditType:编辑类型  方式一、方式二  <参考技术文档>  
  87. //第一位可以为0,1,2,3 其中:0不可编辑;1可以编辑,无痕迹;2可以编辑,有痕迹,不能修订;3可以编辑,有痕迹,能修订；
  88. //第二位可以为0,1 其中:0不可批注,1可以批注。可以参考iWebOffice2006的EditType属性，详细参考技术白皮书
  89.     webform.WebOffice.MaxFileSize = 16 * 1024; //最大的文档大小控制，默认是64M，现在设置成16M。
  91.     //Start  iWebOffice2006属性  以下属性可以不要
  92.     webform.WebOffice.Language="CH"; //Language:多语言支持显示选择   CH 简体 TW繁体 EN英文
  93.     webform.WebOffice.PenColor="#FF0000"; //PenColor:默认批注颜色
  94.     webform.WebOffice.PenWidth="1"; //PenWidth:默认批注笔宽
  95.     webform.WebOffice.Print="1"; //Print:默认是否可以打印:1可以打印批注,0不可以打印批注
  96.     webform.WebOffice.ShowToolBar="1"; //ShowToolBar:是否显示工具栏:1显示,0不显示
  98.     //参数一:Index按钮编号,参数二:Caption按钮显示内容,参数三:Icon图标名称
  99.     webform.WebOffice.AppendTools("11","工具栏11",11); //在OnToolsClick中的 vIndex=11 ,vCaption="工具栏11";
  100.     webform.WebOffice.AppendTools("12","工具栏12",12); //在OnToolsClick中的 vIndex=12 ,vCaption="工具栏12";
  101.     webform.WebOffice.AppendTools("13","-",0);
  103.     webform.WebOffice.ShowMenu="1";
  104.     webform.WebOffice.AppendMenu("1","打开本地文件(&L)");
  105.     webform.WebOffice.AppendMenu("2","保存本地文件(&S)");
  106.     webform.WebOffice.AppendMenu("3","保存远程文件(&U)");
  107.     webform.WebOffice.AppendMenu("4","-");
  108.     webform.WebOffice.AppendMenu("5","签名印章(&Q)");
  109.     webform.WebOffice.AppendMenu("6","验证签章(&Y)");
  110.     webform.WebOffice.AppendMenu("7","-");
  111.     webform.WebOffice.AppendMenu("8","保存版本(&B)");
  112.     webform.WebOffice.AppendMenu("9","打开版本(&D)");
  113.     webform.WebOffice.AppendMenu("10","-");
  114.     webform.WebOffice.AppendMenu("11","测试菜单一(&X)");
  115.     webform.WebOffice.AppendMenu("12","测试菜单二(&Z)");
  116.     webform.WebOffice.AppendMenu("13","-");
  117.     webform.WebOffice.AppendMenu("14","保存并退出(&E)");
  118.     webform.WebOffice.AppendMenu("15","-");
  119.     webform.WebOffice.AppendMenu("16","打印文档(&P)");
  120.     webform.WebOffice.AppendMenu("主菜单","-");
  121.     webform.WebOffice.AppendMenu("17","隐藏手写批注(&C)");
  122.     webform.WebOffice.AppendMenu("18","显示手写批注(&O)");
  123.     webform.WebOffice.DisableMenu("宏(&M);选项(&O)..."); //禁止菜单
  124.     //End
  126.     webform.WebOffice.WebOpen(); //打开该文档    交互OfficeServer  调出文档OPTION="LOADFILE"    调出模板OPTION="LOADTEMPLATE"     <参考技术文档>
  127.     webform.WebOffice.ShowType=<%=mShowType%>; //文档显示方式  1:表示文字批注  2:表示手写批注  0:表示文档核稿
  129.     StatusMsg(webform.WebOffice.Status); //状态信息
  130.   }catch(e){
  131.     alert(e.description); //显示出错误信息
  132.   }
  133. }
  135. //作用：退出iWebOffice
  136. function UnLoad(){
  137.   try{
  138.   if (!webform.WebOffice.WebClose()){
  139.      StatusMsg(webform.WebOffice.Status);
  140.   }else{
  141.      StatusMsg("关闭文档...");
  142.   }
  143.   }catch(e){alert(e.description);}
  144. }
  146. //作用：打开文档
  147. function LoadDocument(){
  148.   StatusMsg("正在打开文档...");
  149.   if (!webform.WebOffice.WebOpen()){   //打开该文档    交互OfficeServer的OPTION="LOADFILE"
  150.      StatusMsg(webform.WebOffice.Status);
  151.   }else{
  152.      StatusMsg(webform.WebOffice.Status);
  153.   }
  154. }
  156. //作用：保存文档
  157. function SaveDocument(){
  158.   //webform.WebOffice.WebSetMsgByName("MyDefine1","自定义变量值1");  //设置变量MyDefine1="自定义变量值1"，变量可以设置多个  在WebSave()时，一起提交到OfficeServer中
  159.   if (!webform.WebOffice.WebSave()){    //交互OfficeServer的OPTION="SAVEFILE"  注：WebSave()是保存复合格式文件，包括OFFICE内容和手写批注文档；如只保存成OFFICE文档格式，那么就设WebSave(true)
  160.      StatusMsg(webform.WebOffice.Status);
  161.      return false;
  162.   }else{
  163.      StatusMsg(webform.WebOffice.Status);
  164.      return true;
  165.   }
  166. }
  169. //作用：显示或隐藏痕迹[隐藏痕迹时修改文档没有痕迹保留]  true表示隐藏痕迹  false表示显示痕迹
  170. function ShowRevision(mValue){
  171.   if (mValue){
  172.      webform.WebOffice.WebShow(true);
  173.      StatusMsg("显示痕迹...");
  174.   }else{
  175.      webform.WebOffice.WebShow(false);
  176.      StatusMsg("隐藏痕迹...");
  177.   }
  178. }
  181. //作用：显示或隐藏痕迹[隐藏痕迹时修改文档有痕迹保留]  true表示隐藏痕迹  false表示显示痕迹
  182. function ShowRevision2(mValue){
  183.   if (mValue){
  184.      webform.WebOffice.WebObject.ShowRevisions=true;   //显示痕迹
  185.   }else{
  186.      webform.WebOffice.WebObject.ShowRevisions=false;  //隐藏痕迹
  187.   }
  188. }
  191. //作用：获取痕迹
  192. function WebGetRevisions(){
  193.   var Rev = webform.WebOffice.WebObject.Revisions; //获取痕迹对象
  194.   var Text="";
  196.   for (i = 1;i <= Rev.Count;i++){
  197.     Text=Text +"“"+ Rev.Item(i).Author+"”";
  198.     if (Rev.Item(i).Type=="1"){
  199.       Text=Text + '进行插入：'+Rev.Item(i).Range.Text+"rn";
  200.     }else if (Rev.Item(i).Type=="2"){
  201.       Text=Text + '进行删除：'+Rev.Item(i).Range.Text+"rn";
  202.     }
  203. else {
  204.       Text=Text + '进行其他操作，操作内容：“'+Rev.Item(i).Range.Text+ '”；操作：“'+Rev.Item(i).FormatDescription+"”。rn";
  205.     }
  206.   }
  207.   alert("痕迹内容：rnrn"+Text);
  208. }
  210. //作用：刷新文档
  211. function WebReFresh(){
  212.   webform.WebOffice.WebReFresh();
  213.   StatusMsg("文档已刷新...");
  214. }
  217. //作用：打开版本
  218. function WebOpenVersion(){
  219.   webform.WebOffice.WebOpenVersion();   //交互OfficeServer  列出版本OPTION="LISTVERSION"     调出版本OPTION="LOADVERSION"   <参考技术文档>
  220.   StatusMsg(webform.WebOffice.Status);
  221. }
  223. //作用：保存版本
  224. function WebSaveVersion(){
  225.   webform.WebOffice.WebSaveVersion();   //交互OfficeServer的OPTION="SAVEVERSION"
  226.   StatusMsg(webform.WebOffice.Status);
  228. }
  230. //作用：保存当前版本
  231. function WebSaveVersionByFileID(){
  232.   var mText=window.prompt("请输入版本说明:","版本号:V");
  233.   if (mText==null){
  234.      mText="已修改版本.";
  235.   }
  236.   webform.WebOffice.WebSaveVersionByFileID(mText);   //交互OfficeServer的OPTION="SAVEVERSION"  同时带FileID值   <参考技术文档>
  237.   StatusMsg(webform.WebOffice.Status);
  238. }
  241. //作用：填充模板
  242. function LoadBookmarks(){
  243.   StatusMsg("正在填充模扳...");
  244.   if (!webform.WebOffice.WebLoadBookmarks()){   //交互OfficeServer的OPTION="LOADBOOKMARKS"
  245.      StatusMsg(webform.WebOffice.Status);
  246.   }else{
  247.      StatusMsg(webform.WebOffice.Status);
  248.   }
  249. }
  251. //作用：标签管理
  252. function WebOpenBookMarks(){
  253.   try{
  254.     webform.WebOffice.WebOpenBookmarks();   //交互OfficeServer的OPTION="LISTBOOKMARKS"
  255.     StatusMsg(webform.WebOffice.Status);
  256.   }catch(e){alert(e.description);}
  257. }
  259. //作用：设置书签值  vbmName:标签名称，vbmValue:标签值   标签名称注意大小写
  260. function SetBookmarks(vbmName,vbmValue){
  261.   if (!webform.WebOffice.WebSetBookmarks(vbmName,vbmValue)){
  262.      StatusMsg(webform.WebOffice.Status);
  263.   }else{
  264.      StatusMsg(webform.WebOffice.Status);
  265.   }
  266. }
  268. //作用：根据标签名称获取标签值  vbmName:标签名称
  269. function GetBookmarks(vbmName){
  270.   var vbmValue;
  271.   vbmValue=webform.WebOffice.WebGetBookmarks(vbmName);
  272.   return vbmValue;
  273. }
  275. //作用：打印文档
  276. function WebOpenPrint(){
  277.   try{
  278.     webform.WebOffice.WebOpenPrint();
  279.     StatusMsg(webform.WebOffice.Status);
  280.   }catch(e){alert(e.description);}
  281. }
  284. //作用：页面设置
  285. function WebOpenPageSetup(){
  286.    try{
  287. if (webform.WebOffice.FileType==".doc"){
  288.   webform.WebOffice.WebObject.Application.Dialogs(178).Show();
  289. }
  290. if(webform.WebOffice.FileType==".xls"){
  291.   webform.WebOffice.WebObject.Application.Dialogs(7).Show();
  292. }
  293.    }catch(e){alert(e.description);}
  294. }
  296. //作用：插入图片
  297. function WebOpenPicture(){
  298.   try{
  299.     webform.WebOffice.WebOpenPicture();
  300.     StatusMsg(webform.WebOffice.Status);
  301.   }catch(e){alert(e.description);}
  302. }
  304. //作用：签名印章
  305. function WebOpenSignature(){
  306.   alert("如果你要更安全签章,建议采用金格iSignature电子签章软件进行签章:rn下载地址http://www.goldgrid.cn/iSignature/Download.asprnrn该软件是支持文档完整性保护、CA证书和数字签名技术的,rn是通过了<国家公安部和国家保密局>双重认证的安全电子签章产品!");
  307.   try{
  308.     webform.WebOffice.WebOpenSignature();   //交互OfficeServer的 A签章列表OPTION="LOADMARKLIST"    B签章调出OPTION="LOADMARKIMAGE"    C确定签章OPTION="SAVESIGNATURE"    <参考技术文档>
  309.     StatusMsg(webform.WebOffice.Status);
  310.   }catch(e){alert(e.description);}
  311. }
  313. //作用：验证印章A
  314. function WebShowSignature(){
  315.   try{
  316.     webform.WebOffice.WebShowSignature();   //交互OfficeServer的OPTION="LOADSIGNATURE"
  317.     StatusMsg(webform.WebOffice.Status);
  318.   }catch(e){alert(e.description);}
  319. }
  321. //作用：验证印章B
  322. function WebCheckSignature(){
  323.   try{
  324.     var i=webform.WebOffice.WebCheckSignature();   //交互OfficeServer的OPTION="LOADSIGNATURE"
  325.     alert("检测结果："+i+"rn 注释: (=-1 有非法印章) (=0 没有任何印章) (>=1 有多个合法印章)");
  326.     StatusMsg(i);
  327.   }catch(e){alert(e.description);}
  328. }
  330. //作用：存为本地文件
  331. function WebSaveLocal(){
  332.   try{
  333.     webform.WebOffice.WebSaveLocal();
  334.     StatusMsg(webform.WebOffice.Status);
  335.   }catch(e){alert(e.description);}
  336. }
  338. //作用：打开本地文件
  339. function WebOpenLocal(){
  340.   try{
  341.     webform.WebOffice.WebOpenLocal();
  342.     StatusMsg(webform.WebOffice.Status);
  343.   }catch(e){alert(e.description);}
  344. }
  346. //作用：保存为HTML文档
  347. function WebSaveAsHtml(){
  348.   try{
  349.     if (webform.WebOffice.WebSaveAsHtml())   //交互OfficeServer的OPTION="SAVEASHTML"
  350.     {
  351.       webform.HTMLPath.value="HTML/<%=mRecordID%>.htm";
  352.       window.open("<%=mHttpUrl%>"+ webform.HTMLPath.value);
  353.     }
  354.     StatusMsg(webform.WebOffice.Status);
  355.   }catch(e){alert(e.description);}
  356. }
  359. //作用：保存为文档图片
  360. function WebSaveAsPage(){
  361.   try{
  362.     if (webform.WebOffice.WebSaveImage())   //交互OfficeServer的OPTION="SAVEIMAGE"
  363.     {
  364.       webform.HTMLPath.value="HTMLIMAGE/<%=mRecordID%>.htm";
  365.       window.open("<%=mHttpUrl%>"+ webform.HTMLPath.value);
  366.     }
  367.     StatusMsg(webform.WebOffice.Status);
  368.   }catch(e){alert(e.description);}
  369. }
  372. //作用：关闭或显示工具 参数1表示工具条名称  参数2为false时，表示关闭  （名称均可查找VBA帮助）
  373. //参数2为true时，表示显示
  374. function WebToolsVisible(ToolName,Visible){
  375.   try{
  376.     webform.WebOffice.WebToolsVisible(ToolName,Visible);
  377.     StatusMsg(webform.WebOffice.Status);
  378.   }catch(e){alert(e.description);}
  379. }
  382. //作用：禁止或启用工具 参数1表示工具条名称  参数2表示工具条铵钮的编号  （名称和编号均可查找VBA帮助）
  383. //参数3为false时，表示禁止  参数3为true时，表示启用
  384. function WebToolsEnable(ToolName,ToolIndex,Enable){
  385.   try{
  386.     webform.WebOffice.WebToolsEnable(ToolName,ToolIndex,Enable);
  387.     StatusMsg(webform.WebOffice.Status);
  388.   }catch(e){alert(e.description);}
  389. }
  391. //作用：保护与解除  参数1为true表示保护文档  false表示解除保护
  392. function WebProtect(value){
  393.   try{
  394.     webform.WebOffice.WebSetProtect(value,"");  //""表示密码为空
  395.   }catch(e){alert(e.description);}
  396. }
  398. //作用：允许与禁止拷贝功能  参数1为true表示允许拷贝  false表示禁止拷贝
  399. function WebEnableCopy(value){
  400.   try{
  401.     webform.WebOffice.CopyType=value;
  402.   }catch(e){alert(e.description);}
  403. }
  406. //作用：插入远程服务器图片
  407. function WebInsertImage(){
  408.   try{
  409.     webform.WebOffice.WebInsertImage('Image','GoldgridLogo.jpg',true,4);   //交互OfficeServer的OPTION="INSERTIMAGE"  参数1表示标签名称  参数2表示图片文件名  参数3为true透明  false表示不透明  参数4为4表示浮于文字上方  5表示衬于文字下方
  410.     StatusMsg(webform.WebOffice.Status);
  411.   }catch(e){alert(e.description);}
  412. }
  415. //作用：下载服务器文件到本地
  416. function WebGetFile(){
  417.   if (webform.WebOffice.WebGetFile("c:\WebGetFile.doc","DownLoad.doc")){   //交互OfficeServer的OPTION="GETFILE"  参数1表示本地路径  参数2表示服务器文件名称
  418.     StatusMsg(webform.WebOffice.Status);
  419.   }else{
  420.     StatusMsg(webform.WebOffice.Status);
  421.   }
  422.   alert(webform.WebOffice.Status+"rn"+"文件放在c:\WebGetFile.doc");
  423. }
  426. //作用：上传本地文件到服务器
  427. function WebPutFile(){
  428.   var mLocalFile=webform.WebOffice.WebOpenLocalDialog();
  429.   if (mLocalFile!=""){
  430.     alert(mLocalFile);
  431.     if (webform.WebOffice.WebPutFile(mLocalFile,"Test.doc")){   //交互OfficeServer的OPTION="PUTFILE"  参数1表示本地路径，可以任何格式文件  参数2表示服务器文件名称
  432.       StatusMsg(webform.WebOffice.Status);
  433.     }else{
  434.       StatusMsg(webform.WebOffice.Status);
  435.     }
  436.     alert(webform.WebOffice.Status);
  437.   }
  438. }
  441. //作用：打开远程文件
  442. function WebDownLoadFile(){
  443.   mResult=webform.WebOffice.WebDownLoadFile("http://www.goldgrid.com/Images/abc.doc","c:\abc.doc");
  444.   if (mResult){
  445.     webform.WebOffice.WebOpenLocalFile("c:\abc.doc");
  446.     alert("成功");
  447.   }else{
  448.     alert("失败");
  449.   }
  450. }
  452. //作用：取得服务器端时间，设置本地时间  [V6.0.1.5以上支持]
  453. function WebDateTime(){
  454.   mResult=webform.WebOffice.WebDateTime(true);   //交互OfficeServer的OPTION="DATETIME"   true表示返回并设置本地时间为服务器时间；false表示仅返回服务器时间
  455.   alert("提示：已经设置本地时间为 "+mResult);    //该功能主要用于在痕迹保留时读取服务器时间
  456. }
  459. //作用：表格生成及填充
  460. function WebSetWordTable(){
  461.   var mText="",mName="",iColumns,iCells,iTable;
  462.   //设置COMMAND为WORDTABLE
  463.   webform.WebOffice.WebSetMsgByName("COMMAND","WORDTABLE");   //设置变量COMMAND="WORDTABLE"，在WebSendMessage()时，一起提交到OfficeServer中
  464.   //发送到服务器上
  465.   //如果没有错误
  466.   if (webform.WebOffice.WebSendMessage()){                //交互OfficeServer的OPTION="SENDMESSAGE"
  467. iColumns = webform.WebOffice.WebGetMsgByName("COLUMNS");  //取得列
  468. iCells = webform.WebOffice.WebGetMsgByName("CELLS");      //取得行
  469. iTable=webform.WebOffice.WebObject.Tables.Add(webform.WebOffice.WebObject.Application.Selection.Range,iCells,iColumns);   //生成表格
  470. for (var i=1; i<=iColumns; i++)
  471. {
  472.       for (var j=1; j<=iCells; j++)
  473.   {
  474. mName=i.toString()+j.toString();
  475. mText=webform.WebOffice.WebGetMsgByName(mName);  //取得OfficeServer中的表格内容
  476. iTable.Columns(i).Cells(j).Range.Text=mText;    //填充单元值
  477.    }
  478. }
  479.    }
  480.    StatusMsg(webform.WebOffice.Status);
  481. }
  484. //作用：获取文档Txt正文
  485. function WebGetWordContent(){
  486.   try{
  487.     alert(webform.WebOffice.WebObject.Content.Text);
  488.   }catch(e){alert(e.description);}
  489. }
  491. //作用：写Word内容
  492. function WebSetWordContent(){
  493.   var mText=window.prompt("请输入内容:","测试内容");
  494.   if (mText==null){
  495.      return (false);
  496.   }
  497.   else
  498.   {
  499.      //下面为显示选中的文本
  500.      //alert(webform.WebOffice.WebObject.Application.Selection.Range.Text);
  501.      //下面为在当前光标出插入文本
  502.      webform.WebOffice.WebObject.Application.Selection.Range.Text= mText+"n";
  503.      //下面为在第一段后插入文本
  504.      //webform.WebOffice.WebObject.Application.ActiveDocument.Range(1).Text=(mText);
  505.   }
  506. }
  509. //作用：打印黑白文档
  510. function WebWordPrintBlackAndWhile(){
  511.    var i,n;
  513.    //图片变黑白
  514.    i=0;
  515.    n=webform.WebOffice.WebObject.Shapes.Count;
  516.    for (var i=1; i<=n; i++)
  517.    {
  518.       webform.WebOffice.WebObject.Shapes.Item(i).PictureFormat.ColorType=3;
  519.    }
  520.    i=0;
  521.    n=webform.WebOffice.WebObject.InlineShapes.Count;
  522.    for (var i=1; i<=n; i++)
  523.    {
  524.       webform.WebOffice.WebObject.InlineShapes.Item(i).PictureFormat.ColorType=3;
  525.    }
  527.    //文字变黑白
  528.    webform.WebOffice.WebObject.Application.Selection.WholeStory();
  529.    webform.WebOffice.WebObject.Application.Selection.Range.Font.Color = 0;
  530. }
  532. //作用：用Excel求和
  533. function WebGetExcelContent(){
  534.     webform.WebOffice.WebObject.Application.Sheets(1).Select;
  535.     webform.WebOffice.WebObject.Application.Range("C5").Select;
  536.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "126";
  537.     webform.WebOffice.WebObject.Application.Range("C6").Select;
  538.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "446";
  539.     webform.WebOffice.WebObject.Application.Range("C7").Select;
  540.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "556";
  541.     webform.WebOffice.WebObject.Application.Range("C5:C8").Select;
  542.     webform.WebOffice.WebObject.Application.Range("C8").Activate;
  543.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "=SUM(R[-3]C:R[-1]C)";
  544.     webform.WebOffice.WebObject.Application.Range("D8").Select;
  545.     alert(webform.WebOffice.WebObject.Application.Range("C8").Text);
  546. }
  549. //作用：保护工作表单元
  550. function WebSheetsLock(){
  551.     webform.WebOffice.WebObject.Application.Sheets(1).Select;
  553.     webform.WebOffice.WebObject.Application.Range("A1").Select;
  554.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "产品";
  555.     webform.WebOffice.WebObject.Application.Range("B1").Select;
  556.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "价格";
  557.     webform.WebOffice.WebObject.Application.Range("C1").Select;
  558.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "详细说明";
  559.     webform.WebOffice.WebObject.Application.Range("D1").Select;
  560.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "库存";
  561.     webform.WebOffice.WebObject.Application.Range("A2").Select;
  562.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "书签";
  563.     webform.WebOffice.WebObject.Application.Range("A3").Select;
  564.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "毛笔";
  565.     webform.WebOffice.WebObject.Application.Range("A4").Select;
  566.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "钢笔";
  567.     webform.WebOffice.WebObject.Application.Range("A5").Select;
  568.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "尺子";
  570.     webform.WebOffice.WebObject.Application.Range("B2").Select;
  571.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "0.5";
  572.     webform.WebOffice.WebObject.Application.Range("C2").Select;
  573.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "樱花";
  574.     webform.WebOffice.WebObject.Application.Range("D2").Select;
  575.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "300";
  577.     webform.WebOffice.WebObject.Application.Range("B3").Select;
  578.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "2";
  579.     webform.WebOffice.WebObject.Application.Range("C3").Select;
  580.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "狼毫";
  581.     webform.WebOffice.WebObject.Application.Range("D3").Select;
  582.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "50";
  584.     webform.WebOffice.WebObject.Application.Range("B4").Select;
  585.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "3";
  586.     webform.WebOffice.WebObject.Application.Range("C4").Select;
  587.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "蓝色";
  588.     webform.WebOffice.WebObject.Application.Range("D4").Select;
  589.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "90";
  591.     webform.WebOffice.WebObject.Application.Range("B5").Select;
  592.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "1";
  593.     webform.WebOffice.WebObject.Application.Range("C5").Select;
  594.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "20cm";
  595.     webform.WebOffice.WebObject.Application.Range("D5").Select;
  596.     webform.WebOffice.WebObject.Application.ActiveCell.FormulaR1C1 = "40";
  598.     //保护工作表
  599.     webform.WebOffice.WebObject.Application.Range("B2:D5").Select;
  600.     webform.WebOffice.WebObject.Application.Selection.Locked = false;
  601.     webform.WebOffice.WebObject.Application.Selection.FormulaHidden = false;
  602.     webform.WebOffice.WebObject.Application.ActiveSheet.Protect(true,true,true);
  604.     alert("已经保护工作表，只有B2-D5单元格可以修改。");
  605. }
  607. //作用：VBA套红
  608. function WebInsertVBA(){
  610. //画线
  611. var object=webform.WebOffice.WebObject;
  612. var myl=object.Shapes.AddLine(100,60,305,60)
  613. myl.Line.ForeColor=255;
  614. myl.Line.Weight=2;
  615. var myl1=object.Shapes.AddLine(326,60,520,60)
  616. myl1.Line.ForeColor=255;
  617. myl1.Line.Weight=2;
  619. //object.Shapes.AddLine(200,200,450,200).Line.ForeColor=6;
  620.     var myRange=webform.WebOffice.WebObject.Range(0,0);
  621. myRange.Select();
  623. var mtext="★";
  624. webform.WebOffice.WebObject.Application.Selection.Range.InsertAfter (mtext+"n");
  625.     var myRange=webform.WebOffice.WebObject.Paragraphs(1).Range;
  626.     myRange.ParagraphFormat.LineSpacingRule =1.5;
  627.     myRange.font.ColorIndex=6;
  628.     myRange.ParagraphFormat.Alignment=1;
  629.     myRange=webform.WebOffice.WebObject.Range(0,0);
  630. myRange.Select();
  631. mtext="金格发[２００３]１５４号";
  632. webform.WebOffice.WebObject.Application.Selection.Range.InsertAfter (mtext+"n");
  633. myRange=webform.WebOffice.WebObject.Paragraphs(1).Range;
  634. myRange.ParagraphFormat.LineSpacingRule =1.5;
  635. myRange.ParagraphFormat.Alignment=1;
  636. myRange.font.ColorIndex=1;
  638. mtext="金格电子政务文件";
  639. webform.WebOffice.WebObject.Application.Selection.Range.InsertAfter (mtext+"n");
  640. myRange=webform.WebOffice.WebObject.Paragraphs(1).Range;
  641. myRange.ParagraphFormat.LineSpacingRule =1.5;
  643. //myRange.Select();
  644. myRange.Font.ColorIndex=6;
  645. myRange.Font.Name="仿宋_GB2312";
  646. myRange.font.Bold=true;
  647. myRange.Font.Size=50;
  648. myRange.ParagraphFormat.Alignment=1;
  650. //myRange=myRange=webform.WebOffice.WebObject.Paragraphs(1).Range;
  651. webform.WebOffice.WebObject.PageSetup.LeftMargin=70;
  652. webform.WebOffice.WebObject.PageSetup.RightMargin=70;
  653. webform.WebOffice.WebObject.PageSetup.TopMargin=70;
  654. webform.WebOffice.WebObject.PageSetup.BottomMargin=70;
  655. }
  657. //作用：套用模版定稿
  658. function WebInsertFile(){
  659.   var mDialogUrl = "Template/TemplateForm.aspx";
  660.   var mObject = new Object();
  661.       mObject.Template = "";
  662.       window.showModalDialog(mDialogUrl, mObject, "dialogHeight:200px; dialogWidth:360px;center:yes;scroll:no;status:no;");
  664.   //判断用户是否选择模板
  665.   if (mObject.Template==""){
  666.     StatusMsg("取消套用模");
  667.     return false;
  668.   }else{
  669.     //SaveDocument();    //保存当前编辑的文档
  670.     webform.WebOffice.WebSetMsgByName("COMMAND","INSERTFILE");   //设置变量COMMAND="INSERTFILE"，在WebLoadTemplate()时，一起提交到OfficeServer中     <参考技术文档>
  671.     webform.WebOffice.Template=mObject.Template;                 //全局变量Template赋值，此示例读取服务器目录中模板，如读取数据库中模板，Template值为数据库中的模板编号，则上句代码不需要，如Template="1050560363767"，模板名称为“Word公文模板”，注：模板中有要标签Content，区分大小写，可以自行修改
  672.     if (webform.WebOffice.WebLoadTemplate()){                    //交互OfficeServer的OPTION="LOADTEMPLATE"
  673.        //SetBookmarks("Title","关于中间件研发工作会议通知");     //填充模板其它基本信息，如标题，主题词，文号，主送机关等
  674.        if (webform.WebOffice.WebInsertFile()){                   //填充公文正文   交互OfficeServer的OPTION="INSERTFILE"
  675.          StatusMsg(webform.WebOffice.Status);
  676.        }else{
  677.          StatusMsg(webform.WebOffice.Status);
  678.        }
  679.     }else{
  680.        StatusMsg(webform.WebOffice.Status);
  681.     }
  682.   }
  683. }
  685. //作用：保存定稿文件
  686. function WebUpdateFile(){
  687.   if (webform.WebOffice.WebUpdateFile()){                //交互OfficeServer的OPTION="UPDATEFILE"，类似WebSave()或WebSaveVersion()方法
  688.      StatusMsg(webform.WebOffice.Status);
  689.   }else{
  690.      StatusMsg(webform.WebOffice.Status);
  691.   }
  692. }
  696. //打印份数控制
  697. function WebCopysCtrlPrint(){
  698.   var mCopies,objPrint;
  699.   objPrint = webform.WebOffice.WebObject.Application.Dialogs(88);     //打印设置对话框
  700.   if (objPrint.Display==-1){
  701.     mCopies=objPrint.NumCopies;    //取得需要打印份数
  702.     webform.WebOffice.WebSetMsgByName("COMMAND","COPIES");
  703.     webform.WebOffice.WebSetMsgByName("OFFICEPRINTS",mCopies.toString());   //设置变量OFFICEPRINTS的值，在WebSendMessage()时，一起提交到OfficeServer中
  704.     webform.WebOffice.WebSendMessage();                               //交互OfficeServer的OPTION="SENDMESSAGE"       
  705.     if (webform.WebOffice.Status=="1") {
  706.       alert("可以允许打印，注：该实例设置总文档打印份数2份");
  707.       objPrint.Execute;
  708.     }else{
  709.       alert("已超出允许的打印份数");
  710.       return false;
  711.     }
  712.   }
  713. }
  716. //作用：导入Text
  717. function WebInportText(){
  718.     var mText;
  719.     webform.WebOffice.WebSetMsgByName("COMMAND","INPORTTEXT");  //设置变量COMMAND="INPORTTEXT"，在WebSendMessage()时，一起提交到OfficeServer中
  720.     if (webform.WebOffice.WebSendMessage()){                    //交互OfficeServer的OPTION="SENDMESSAGE"
  721.       mText=webform.WebOffice.WebGetMsgByName("CONTENT");       //取得OfficeServer传递的变量CONTENT值
  722.       webform.WebOffice.WebObject.Application.Selection.Range.Text=mText;
  723.       alert("导入文本成功");
  724.     }
  725.     StatusMsg(webform.WebOffice.Status);
  726. }
  729. //作用：导出Text
  730. function WebExportText(){
  731.     var mText=webform.WebOffice.WebObject.Content.Text;
  732.     webform.WebOffice.WebSetMsgByName("COMMAND","EXPORTTEXT");  //设置变量COMMAND="EXPORTTEXT"，在WebSendMessage()时，一起提交到OfficeServer中
  733.     webform.WebOffice.WebSetMsgByName("CONTENT",mText);         //设置变量CONTENT="mText"，在WebSendMessage()时，一起提交到OfficeServer中，可用于实现全文检索功能，对WORD的TEXT内容进行检索
  734.     if (webform.WebOffice.WebSendMessage()){                    //交互OfficeServer的OPTION="SENDMESSAGE"
  735.       alert("导出文本成功");
  736.     }
  737.     StatusMsg(webform.WebOffice.Status);
  738. }
  741. //作用：获取文档页数
  742. function WebDocumentPageCount(){
  743.     if (webform.WebOffice.FileType==".doc"){
  744. var intPageTotal = webform.WebOffice.WebObject.Application.ActiveDocument.BuiltInDocumentProperties(14);
  745. alert("文档页总数："+intPageTotal);
  746.     }
  747.     if (webform.WebOffice.FileType==".wps"){
  748. var intPageTotal = webform.WebOffice.WebObject.PagesCount();
  749. alert("文档页总数："+intPageTotal);
  750.     }
  751. }
  753. //作用：签章锁定文件功能
  754. function WebSignatureAtReadonly(){
  755.   webform.WebOffice.WebSetProtect(false,"");                  //解除文档保护
  756.   webform.WebOffice.WebSetRevision(false,false,false,false);  //设置文档痕迹保留的状态  参数1:不显示痕迹  参数2:不保留痕迹  参数3:不打印时有痕迹  参数4:不显痕迹处理工具
  757.   try{
  758.     webform.WebOffice.WebOpenSignature();                     //交互OfficeServer的 A签章列表OPTION="LOADMARKLIST"    B签章调出OPTION="LOADMARKIMAGE"    C确定签章OPTION="SAVESIGNATURE"    <参考技术文档>    文档中要定义标签Manager，可以自行修改标签名称
  759.     StatusMsg(webform.WebOffice.Status);
  760.   }catch(e){alert(e.description);}
  761.   webform.WebOffice.WebSetProtect(true,"");                   //锁定文档
  762. }
  764. //作用：客户端和服务器端信息信息交互
  765. function WebSendInformation(){
  766.   var info = window.prompt("请输入要传到服务器处理页面上的内容:","参数内容");
  767.   if (info==null){return false}
  769.   webform.WebOffice.WebSetMsgByName("COMMAND","SELFINFO"); //设置变量COMMAND="SELFINFO"，用来在服务器端做判断，以进入处理自定义参数传递的代码。
  770.   webform.WebOffice.WebSetMsgByName("TESTINFO",info); //自定义的一个参数"TESTINFO"，将info变量的信息设置到信息包中，以便传到后台。
  771.   if (webform.WebOffice.WebSendMessage()){ //向后台发信息包。交互OfficeServer的OPTION="SENDMESSAGE"。
  772.     info = webform.WebOffice.WebGetMsgByName("RETURNINFO"); //如果交互成功，接受服务器端返回的信息。
  773. alert(info);
  774.   }
  775.   else{
  776.     StatusMsg(webform.WebOffice.Status);
  777.   }
  778. }
  780. </script>
  781. </head>
  782. <body bgcolor="#ffffff" onload="Load()" onunload="UnLoad()">  <!--引导和退出iWebOffice-->
  783.   <form name="webform" method="post" action="DocumentSave.aspx" onsubmit="return SaveDocument();">  <!--保存iWebOffice后提交表单信息-->
  784.     <input type="hidden" name="RecordID" value="<%=mRecordID%>">
  785.     <input type="hidden" name="Template" value="<%=mTemplate%>">
  786.     <input type="hidden" name="FileType" value="<%=mFileType%>">
  787.     <input type="hidden" name="EditType" value="<%=mEditType%>">
  788.     <input type="hidden" name="HTMLPath" value="<%=mHTMLPath%>">
  789.     <table border=0  cellspacing='0' cellpadding='0' width=100% height=100% align=center class="TBStyle">
  790.       <tr>
  791.         <td align="right" class="TDTitleStyle" width=64>主题</td>
  792.         <td class="TDStyle"><input type="text" name="Subject" value="<%=mSubject%>" class="IptStyle" onblur="SetBookmarks('Caption',this.value);" style="WIDTH:50%"><span color="blue">|选择"Word公文模板"，输入"主题"内容，光标移开，WORD内容自动修改</span></td>
  793.       </tr>
  794.       <tr>
  795.         <td align=right class="TDTitleStyle" width=64>作者</td>
  796.         <td class="TDStyle"><input type="text" name="Author" value="<%=mAuthor%>" class="IptStyle" ></td>
  797.       </tr>
  798.       <tr>
  799.         <td align=right class="TDTitleStyle" width=64>时间</td>
  800.         <td class="TDStyle"><input type=text name=FileDate value="<%=mFileDate%>" readonly class="IptStyle" ></td>
  801.       </tr>
  802.       <tr>
  803.         <!--td align=right valign=top  class="TDTitleStyle" width=64>内容</td-->
  804.        <td align=right valign=top  class="TDTitleStyle" width=79 hegith=90% >
  805.    <b>HTML按钮</b><br><font color="red"><b>功能列表</b></font>
  806.            <input type=button class=button value="文字批注" onclick='webform.WebOffice.ShowType=1;'>
  807.            <input type=button class=button value="手写批注" onclick='webform.WebOffice.ShowType=2;'>
  808.            <input type=button class=button value="文档核稿" onclick='webform.WebOffice.ShowType=0;'>
  809.            <input type=button class=button value="新建文件" onclick='webform.WebOffice.CreateFile();'>
  810.            <input type=button class=button value="重新批注" onclick='webform.WebOffice.ReWrite();'>
  811.            <input type=button class=button value="全屏显示" onclick='webform.WebOffice.FullSize();'>
  812.            <input type=button class=button value="关闭工具栏" onclick="webform.WebOffice.ShowToolBar=0">
  813.            <input type=button class=button value="打开工具栏" onclick="webform.WebOffice.ShowToolBar=1">
  814.            <input type=button class=button value="禁止打开文件" onclick="webform.WebOffice.DisableTools('打开文件',true)">  <!--true禁止,false启用-->
  815.            <input type=button class=button value="隐藏新建文件" onclick="webform.WebOffice.VisibleTools('新建文件',false)"> <!--true显示,false隐藏-->
  816.            <input type=button class=button value="隐藏全屏" onclick="webform.WebOffice.VisibleTools('全屏',false)"> <!--true显示,false隐藏-->
  817.            <input type=button class=button value="显示全屏" onclick="webform.WebOffice.VisibleTools('全屏',true)"> <!--true显示,false隐藏-->
  818.            <input type=button class=button value="显示版本" onclick="alert('当前控件版本为：'+webform.WebOffice.VersionEx()+webform.WebOffice.Version());">
  820. <font color="red"><b>普通功能</b></font>
  821.            <input type=button class=button value="显示痕迹" <%=mDisabled%> <%=mWord%> onclick="ShowRevision(true)">
  822.            <input type=button class=button value="隐藏痕迹" <%=mDisabled%> <%=mWord%> onclick="ShowRevision(false)">
  823.            <input type=button class=button value="获取痕迹" <%=mDisabled%> <%=mWord%> onclick="WebGetRevisions()">
  824.            <input type=button class=button value="清除痕迹" <%=mDisabled%> <%=mWord%> onclick="webform.WebOffice.WebObject.Application.ActiveDocument.AcceptAllRevisions();">
  825.            <input type=button class=button value="保护文档" <%=mDisabled%> onclick="WebProtect(true)">
  826.            <input type=button class=button value="解除保护" <%=mDisabled%> onclick="WebProtect(false)">
  827.            <input type=button class=button value="允许拷贝" <%=mDisabled%> onclick="WebEnableCopy(true)">
  828.            <input type=button class=button value="禁止拷贝" <%=mDisabled%> onclick="WebEnableCopy(false)">
  829.            <input type=button class=button value="页面设置" <%=mDisabled%> <%=mWord%> onclick="WebOpenPageSetup()">
  830.            <input type=button class=button value="打印文档" <%=mDisabled%> <%=mWord%> onclick="WebOpenPrint()">
  831.            <input type=button class=button value="插入图片" <%=mDisabled%> <%=mWord%> onclick="WebOpenPicture()">
  832.            <input type=button class=button value="重调文档" <%=mDisabled%> <%=mWord%> onclick="LoadDocument()">
  833.            <input type=button class=button value="刷新文档" <%=mDisabled%> <%=mWord%> onclick="WebReFresh()">
  834.            <input type=button class=button value="打开本地文件" <%=mDisabled%> onclick="WebOpenLocal()">
  835.            <input type=button class=button value="存为本地文件" <%=mDisabled%> onclick="WebSaveLocal()">
  837. <font color="red"><b>与服务器交互</b></font>
  838.            <input type=button class=button value="签名印章" <%=mDisabled%> onclick="WebOpenSignature()">
  839.            <input type=button class=button value="验证签章[A]" <%=mDisabled%>  onclick="WebShowSignature()">
  840.            <input type=button class=button value="验证签章[B]" <%=mDisabled%>  onclick="WebCheckSignature()">
  841.            <input type=button class=button value="打开标签" <%=mDisabled%>  <%=mWord%>  onclick="WebOpenBookMarks()">
  842.            <input type=button class=button value="填充模版" <%=mDisabled%>  <%=mWord%>  onclick="LoadBookmarks()">
  843.            <input type=button class=button value="保存版本" <%=mDisabled%>  onclick="WebSaveVersion()">
  844.            <input type=button class=button value="打开版本" <%=mDisabled%>  onclick="WebOpenVersion()">
  845.            <input type=button class=button value="保存当前版本" <%=mDisabled%>  onclick="WebSaveVersionByFileID()">
  846.            <input type=button class=button value="保存定稿版本" <%=mDisabled%>  onclick="WebUpdateFile()">
  847.            <input type=button class=button value="存为HTML" <%=mDisabled%>  onclick="WebSaveAsHtml()">
  848.            <input type=button class=button value="存为HTML图片" <%=mDisabled%>  <%=mWord%>  onclick="WebSaveAsPage()">
  849.            <input type=button class=button value="套用模版定稿" <%=mDisabled%>  <%=mWord%> onclick="WebInsertFile()">
  850.            <input type=button class=button value="VBA套红定稿" <%=mDisabled%>  <%=mWord%>  onclick="WebInsertVBA();">
  851.            <input type=button class=button value="打印控制管理" <%=mDisabled%> <%=mWord%>  onClick="WebCopysCtrlPrint()">
  852.            <input type=button class=button value="导入数据内容" <%=mDisabled%>  <%=mWord%>  onclick="WebInportText();">
  853.            <input type=button class=button value="导出文档内容" <%=mDisabled%>  <%=mWord%>  onclick="WebExportText();">
  854.            <input type=button class=button value="插入远程表格" <%=mDisabled%>  <%=mWord%>  onclick="WebSetWordTable()">
  855.            <input type=button class=button value="插入远程图片" <%=mDisabled%>  <%=mWord%>  onclick="WebInsertImage()">
  856.            <input type=button class=button value="下载服务器文件" <%=mDisabled%> <%=mWord%> onclick="WebGetFile()">
  857.            <input type=button class=button value="上传文件到服务器" <%=mDisabled%> <%=mWord%> onclick="WebPutFile()">
  858.            <input type=button class=button value="打开远程文件"  <%=mDisabled%> <%=mWord%>  onclick="WebDownLoadFile()">
  859.            <input type=button class=button value="设置本地时间"  <%=mDisabled%>  onclick="WebDateTime()">
  860.            <input type=button class=button value="信息传递"  <%=mDisabled%>  onclick="WebSendInformation()">
  861.                 <font color="red"><b>VBA调用</b></font>
  862.            <input type=button class=button value="取Word内容" <%=mDisabled%>  <%=mWord%>  onclick="WebGetWordContent()">
  863.            <input type=button class=button value="写Word内容" <%=mDisabled%>  <%=mWord%>  onclick="WebSetWordContent()">
  864.            <input type=button class=button value="WORD禁止拖动" <%=mDisabled%> <%=mWord%> onclick="webform.WebOffice.WebObject.Application.Options.AllowDragAndDrop=false;">  <!--false禁止拖动  true允许拖动-->
  865.            <input type=button class=button value="打印黑白" <%=mDisabled%> <%=mWord%> onclick="WebWordPrintBlackAndWhile();">
  866.            <input type=button class=button value="插入页眉" <%=mDisabled%> <%=mWord%> onclick="webform.WebOffice.WebObject.ActiveWindow.ActivePane.View.SeekView=9;">
  867.            <input type=button class=button value="插入页码" <%=mDisabled%> <%=mWord%> onclick="webform.WebOffice.WebObject.Application.Dialogs(294).Show();">
  868.            <input type=button class=button value="用Excel求和" <%=mDisabled%>  <%=mExcel%> onclick="WebGetExcelContent()">
  869.            <input type=button class=button value="锁定工作表" <%=mDisabled%>   <%=mExcel%> onclick="WebSheetsLock()">
  870.            <input type=button class=button value="EXCEL禁止拖动" <%=mDisabled%> <%=mExcel%> onclick="webform.WebOffice.WebObject.Application.CellDragAndDrop=false;">  <!--false禁止拖动  true允许拖动-->
  871.            <input type=button class=button value="文档页数" <%=mDisabled%>  <%=mWord%>  onclick="WebDocumentPageCount()">
  873. <font color="red"><b>工具栏</b></font>
  874.            <input type=button class=button value="关闭常用工具" <%=mDisabled%>  onclick="WebToolsVisible('Standard',false)">
  875.            <input type=button class=button value="打开常用工具" <%=mDisabled%>  onclick="WebToolsVisible('Standard',true)">
  876.            <input type=button class=button value="关闭格式工具" <%=mDisabled%>  onclick="WebToolsVisible('Formatting',false)">
  877.            <input type=button class=button value="打开格式工具" <%=mDisabled%>  onclick="WebToolsVisible('Formatting',true)">
  878.            <input type=button class=button value="关闭打印按钮" <%=mDisabled%>  onclick="WebToolsEnable('Standard',2521,false);">
  879.            <input type=button class=button value="打开打印按钮" <%=mDisabled%>  onclick="WebToolsEnable('Standard',2521,true);">
  880.            <input type=button class=button value="关闭文档" <%=mDisabled%>  onclick="webform.WebOffice.WebClose();">
  882.                 <font color="red"><b>其他调用</b></font>
  883.            <input type=button class=button value="签章锁定文件" <%=mDisabled%>  onclick="WebSignatureAtReadonly();">
  884.         </td>
  885.         <td class="TDStyle" height=90%>
  886.            <table border=0 cellspacing='0' cellpadding='0' width='100%' height='100%' >
  887.              <tr>
  888.                 <td bgcolor=menu>
  889.                   <!--调用iWebOffice，注意版本号，可用于升级-->
  890.                   <script src="iWebOffice2006.js"></script>
  891.                 </td>
  892.              </tr>
  893.              <tr>
  894.                 <td bgcolor=menu height='20'><div id=StatusBar>状态栏</div></td>
  895.              </tr>
  896.            </table>
  897.         </td>
  898.       </tr>
  899.     </table>
  900.     <input type=submit value="  保存  " <%=mDisabledSave%> >
  901.     <input type=button value="  返回  " onclick="history.back()"> 注意：只有选择《保存》后，所做的操作才有效！
  902.   </form>
  903. </body>
  904. </html>