js操作word套红

2023-05-16

//(标准版)

//隐藏或显示修订痕迹
function jsShowTrack(value)
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").ShowRevisions = value;
}

//接受所有修订,清除痕迹
function jsAcceptAllRevisions()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").AcceptAllRevisions();
}
//获取并显示所有痕迹
function jsGetAllRevisions()
{
var i;
var str="";
for (i = 1;i <=document.all("SOAOfficeCtrl").Document.Revisions.Count;i++)
{
str=str + document.all("SOAOfficeCtrl").Document.Revisions.Item(i).Author;
if (document.all("SOAOfficeCtrl").Document.Revisions.Item(i).Type=="1")
{
str=str + ' 插入:'+document.all("SOAOfficeCtrl").Document.Revisions.Item(i).Range.Text+"\r\n";
}
else
{
str=str + ' 删除:'+document.all("SOAOfficeCtrl").Document.Revisions.Item(i).Range.Text+"\r\n";
}
}
alert("当前文档的所有修改痕迹如下:\r\n"+str);
}
//插入本地印章
function jsInsertLocalSeal()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").InsertSealFromLocal();
}
//插入手写签名
function jsInsertSignature()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
//document.all("SOAOfficeCtrl").InsertSealFromURL( "images/sign02.esf");//不通过选择,直接插入指定签名
var mDialogUrl = "images/selectSignature.htm";
var mObject = new Object();
mObject.SelectValue = "";
window.showModalDialog(mDialogUrl, mObject, "dialogHeight:180px; dialogWidth:340px;center:yes;scroll:no;status:no;");
//判断用户是否选择签名
if (mObject.SelectValue!="")
{
document.all("SOAOfficeCtrl").InsertSealFromURL("images/" + mObject.SelectValue);
}
}
}
//全文手写批注
function jsStartHandDraw()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").StartHandDraw();
}
//分层显示全文手写批注
function jsShowHandDrawDispBar()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").ShowHandDrawDispBar();
}
//给文档添加数字签名
function jsAddDigitalSignature()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
//document.all("SOAOfficeCtrl").AddDigitalSignature();
alert("标准版无数字签名功能。");
}

//验证数字签名
function jsValidateDigitalSignatures()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
//document.all("SOAOfficeCtrl").VerifyDigitalSignatures();
alert("标准版无数字签名功能。");

}

//插入电子印章
function jsInsertSeal()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
//document.all("SOAOfficeCtrl").InsertSealFromURL("images/seal02.esf");//不通过选择,直接插入指定印章
var mDialogUrl = "images/selectSeal.htm";
var mObject = new Object();
mObject.SelectValue = "";
window.showModalDialog(mDialogUrl, mObject, "dialogHeight:180px; dialogWidth:340px;center:yes;scroll:no;status:no;");
//判断用户是否选择印章
if (mObject.SelectValue!="")
{
document.all("SOAOfficeCtrl").InsertSealFromURL( "images/" + mObject.SelectValue);
}
}
}
//验证电子印章/签名的有效性
function jsValidateSeal()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").ValidateSeal();
}
//允许或禁止 复制/拷贝
function jsCanCopy(value)
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").CanCopy = value;
}
//插入Web图片
function jsInsertWebImage()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").InsertWebImage( "images/SOA_05.gif");
}
//页面设置
function jsDocPageSetup()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").ShowDialog(5);
}
//切换标题栏
function jsToggleTitlebar()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").Titlebar = !document.all("SOAOfficeCtrl").Titlebar;
}
//切换菜单栏
function jsToggleMenubar()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").Menubar = !document.all("SOAOfficeCtrl").Menubar;
}
//切换工具栏
function jsToggleToolbars()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").Toolbars = !document.all("SOAOfficeCtrl").Toolbars;
}
//禁止/允许 打印文档菜单及按钮
function jsEnablePrint(value)
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
document.all("SOAOfficeCtrl").EnableFileCommand(5) = value;
// 刷新一下工具条
if(document.all("SOAOfficeCtrl").Toolbars)
{
document.all("SOAOfficeCtrl").Toolbars = false;
document.all("SOAOfficeCtrl").Toolbars = true;
}
}

}
//禁止/允许 保存文档菜单及按钮
function jsEnableSave(value)
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
document.all("SOAOfficeCtrl").EnableFileCommand(3) = value;
// 刷新一下工具条
if(document.all("SOAOfficeCtrl").Toolbars)
{
document.all("SOAOfficeCtrl").Toolbars = false;
document.all("SOAOfficeCtrl").Toolbars = true;
}
}

}
//禁止/允许 另存文档菜单及按钮
function jsEnableSaveAs(value)
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").EnableFileCommand(4) = value;
}
//保存文档到web服务器
function jsSave()
{
try {
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").WebSave();//保存当前文档到web服务器,保存(覆盖)到原打开文档的地址处
//document.all("SOAOfficeCtrl").WebSave("aa.doc");表示把当前文档另存到web服务器为aa.doc
}
catch (e)
{
alert("文档保存失败!\n错误信息:" + e.message);
}
}
//保存文档到web服务器,使用页面提交技术,在提交文档的同时提交其他用户定义的页面字段或域
function jsSubmitSave()
{
try {
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
document.all("SOAOfficeCtrl").WebSave();
formData.submit();
}
}
catch (e)
{
alert("文档保存失败!\n错误信息:" + e.message);
}
}
//打开插入本地图片的对话框
function jsOpenImageDialog()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").OpenImageDialog();
}
//获取文档Txt正文
function jsWordToText()
{
alert(document.all("SOAOfficeCtrl").DocText);
}
//VBA套红,套用VBA编程模板
function jsInsertVBATemplate()
{
var DocObject=document.all("SOAOfficeCtrl").Document;
var myl=DocObject.Shapes.AddLine(91,60,285,60)
myl.Line.ForeColor=255;
myl.Line.Weight=2;
var myl1=DocObject.Shapes.AddLine(308,60,502,60)
myl1.Line.ForeColor=255;
myl1.Line.Weight=2;

var myRange=DocObject.Range(0,0);
myRange.Select();

var mtext="★";
DocObject.Application.Selection.Range.InsertAfter (mtext+"\n");
var myRange=DocObject.Paragraphs(1).Range;
myRange.ParagraphFormat.LineSpacingRule =1.5;
myRange.font.ColorIndex=6;
myRange.ParagraphFormat.Alignment=1;
myRange=DocObject.Range(0,0);
myRange.Select();
mtext="市政发[2005]0168号";
DocObject.Application.Selection.Range.InsertAfter (mtext+"\n");
myRange=DocObject.Paragraphs(1).Range;
myRange.ParagraphFormat.LineSpacingRule =1.5;
myRange.ParagraphFormat.Alignment=1;
myRange.font.ColorIndex=1;

mtext="某市政府红头文件";
DocObject.Application.Selection.Range.InsertAfter (mtext+"\n");
myRange=DocObject.Paragraphs(1).Range;
myRange.ParagraphFormat.LineSpacingRule =1.5;

myRange.Font.ColorIndex=6;
myRange.Font.Name="仿宋_GB2312";
myRange.font.Bold=true;
myRange.Font.Size=30;
myRange.ParagraphFormat.Alignment=1;

}
//使用指定的模板套红
function jsApplyFileTemplate()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
{
var mDialogUrl = "images/selectTemplate.htm";
var mObject = new Object();
mObject.SelectValue = "";
window.showModalDialog(mDialogUrl, mObject, "dialogHeight:180px; dialogWidth:340px;center:yes;scroll:no;status:no;");
//判断用户是否选择模板
if (mObject.SelectValue!="")
{
document.all("SOAOfficeCtrl").ApplyTemplateFromURL("doc/" + mObject.SelectValue);
}
}
}
//禁止/允许WORD鼠标拖曳功能
function jsDisableDragAndDrop()
{
if (!bDocOpen)
alert("当前没有已打开的文档。");
else
document.all("SOAOfficeCtrl").Document.Application.Options.AllowDragAndDrop = !document.all("SOAOfficeCtrl").Document.Application.Options.AllowDragAndDrop;
}
//显示保存失败信息
function jsDisplayError()
{
var strErro;
strErro = document.all("SOAOfficeCtrl").LastErro;
if (strErro != ""){
document.write(strErro);
}
else
{
alert("没有发现错误。");
}
}
// 切换到PDF模式
function jsPDF()
{
if (!bDocOpen){
alert("当前没有已打开的文档。");
}
else{
document.all("SOAOfficeCtrl").Document.ActiveWindow.Thumbnails = true;
}

}
// 切换到Page模式
function jsPage()
{
if (!bDocOpen){
alert("当前没有已打开的文档。");
}
else{
document.all("SOAOfficeCtrl").Document.ActiveWindow.Thumbnails = false;
}

}

// 颜色
function jsOleColor(red, green, blue)
{
var decColor = red + 256 * green + 65536 * blue;
return decColor;
}

//将html form的域值拷贝到Word文档的标签中
function jsCopyTextToBookMark(inputname,BookMarkName)
{
try
{
var inputValue="";
var j,elObj,optionItem;
var elObj = document.forms[0].elements(inputname);
if (!elObj)
{
alert("HTML的FORM中没有此输入域:"+ inputname);
return;
}
switch(elObj.type)
{
case "select-one":
inputValue = elObj.options[elObj.selectedIndex].text;
break;
case "select-multiple":
var isFirst = true;
for(j=0;j<elObj.options.length;j++)
{
optionItem = elObj.options[j];
if (optionItem.selected)
{
if(isFirst)
{
inputValue = optionItem.text;
isFirst = false;
}
else
{
inputValue += " " + optionItem.text;
}
}
}

break;
default: // text,Areatext,selecte-one,password,submit,etc.
inputValue = elObj.value;
break;
}
var bkmkObj = document.all("SOAOfficeCtrl").Document.BookMarks(BookMarkName);
if(!bkmkObj)
{
alert("Word 模板中不存在名称为:\""+BookMarkName+"\"的书签!");
}
var saverange = bkmkObj.Range
saverange.Text = inputValue;
document.all("SOAOfficeCtrl").Document.Bookmarks.Add(BookMarkName,saverange);
}
catch(err){

}
finally{
}
}
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

js操作word套红 的相关文章

  • Qt+Pyhton实现麒麟V10系统下word文档读写功能

    目录 前言 1 C 调用python 1 1 安装Python开发环境 1 2 修改Qt工程配置 1 3 初始化Python环境 1 4 C 调用Python 函数 1 5 常用的Python接口 2 python虚拟环境 2 1Pytho
  • java如何文档生成目录

    对于现有文档 含标题 使用spire doc去生成目录 由于不是免费版 没有表格行数限制 但第一页开头有个版权声明 只需要用spire生成目录 然后用poi打开它删去第一行声明即可 spire依赖
  • Word丢失文件怎么恢复?使用Word这些技巧你要了解

    Word是我们常用的办公软件之一 主要用来帮助我们编辑文本 但由于用法简单 很多人不知不觉中就会忽略他的一些技巧 其实 Word里面蕴含着非常多不为人知的奇技淫巧 掌握这些技巧 起码能让你使用Word的效率提高十倍 话不多说 下面我就简单列
  • Linux服务器(centos7)中Word转换PDF,文档出现中文乱码或方格【亲测可用,已解决】

    提示 在centos服务器使用aspose word转换word文件为pdf的时候只有中文乱码或则方格 但是在win服务器上使用可以正常转换 本次文章主要解决字体缺失问题 目录 前言 一 在linux服务器上生成的pdf都是这种格式的 二
  • mac如何利用 applescript 批量将word转换成pdf

    没有更多的废话 直接上代码 代码的注释应该很清楚了 property word docs org openxmlformats wordprocessingml document com microsoft word doc propert
  • java 将pdf转word

    可以使用 Apache POI 库来实现将 PDF 转换为 Word 文档的功能 首先 需要将 Apache POI 库的依赖添加到项目中
  • Python 动态生成系统数据库设计到word文档

    背景 经常需要交付一些系统文档而且基本都是word的 其中又有系统数据库介绍模块 看着数据库里的几百张表于是我开始怀疑人生 所以咱手写一个 涉及知识 pymysql 操作数据库 tkinter GUI图形库 threading 线程 que
  • 【办公类-19-03】办公中的思考——Python批量制作word单元格照片和文字(小照片系列)

    背景需求 工会老师求助 如何在word里面插入4 8的框 我怎么也拉不到4 8大小 她用的是我WORD 文本框 我一听 这又是要手动反复黏贴 文本框 照片 文字 的节奏哦 我问 你要做几个人 超过20个 我写个程序批量插图 写代码测试要费时
  • word文件丢失怎么办?恢复Word文档的3个方案

    电脑里面有很多大大小小的文件数据 有时对我们可有可无 有时是很重要的 在清理电脑过程中 要是不小心误删了重要的文件 word文件丢失如何恢复 只需要下面的3个方案 就可以轻松找回Word文档 方案一 回收站恢复Word文档 要说电脑最容易误
  • 【参考文献不爆红】Word的多个参考文献连续交叉引用([1] [3]改为[1-3])

    文章目录 1 参考文献格式 2 引入参考文献 3 Word的多个参考文献连续交叉引用 1 3 改为 1 3 3 1引入两个参考文献 3 2 引入三个参考文献 3 3 知识科普 1 参考文献格式 参考教程 全选参考文献 gt 编号的小三角 g
  • Android 应用内打开Word、Excel、PPT、PDF等文档

    Android平台中 可以使用以下几种方式打开Word和Excel文档 预览图 一 直接上传给第三方之后用webview打开 1 微软 https view officeapps live com op view aspx src 文件链接
  • 教程:Word中如何让参考文献编号和引用标记都是数字上标

    教程 Word中如何让参考文献编号和引用标记都是上标 更新历史 20190509 首次发布 使用Microsoft Word写论文之类的文档的时候 经常需要列出参考文献 并对它们进行引用 有时候 格式规范要求我们将参考文献编号和引用标记都变
  • word怎么删除最后一页空白页

    1 将光标移动到最后一页的起始处 不停的按删除键 gt 我试了 无效 2 将光标定位在倒数第二页的末尾 直接按delete键进行删除 或者可以试试按住ctrl键再按delete键 gt 我试了 还是无效 3 将光标移动到最后一页 在菜单栏找
  • word中行距设置固定值,图片显示不全的问题

    撰写毕业大论文时 要求正文行间距设置为20磅固定值 但会出现 粘贴图片时 图片显示不全 软件也把图片做一行的固定值显示 解决办法是 选中图片 按ctrl 1单倍行距组合键 此时图片就能显示全了 图片的行间距就是单倍行距
  • 解决word中公式与右编号上下不居中的问题

    1 如图所示 选中右编号敲击公式后 公式与右编号上下不居中 2 在开始 样式 中找到如下图所示的样式 右击 修改 3 进入段落 修改如下图示 然后点击确定 在应用修改后的样式 就好了
  • 使用Spring Boot实现在服务器上在线打开、编辑和保存Word文档

    使用Spring Boot实现在服务器上在线打开 编辑和保存Word文档 在本文中 我们将探讨如何使用Spring Boot框架实现在服务器上实现在线打开 编辑和保存Word文档的功能 为此 我们将使用pageOffice插件来实现这一目标
  • Word调整标题格式

    将光标放在该级标题之后 右键 编号 定义新编号形式 编号格式改为想要的形式 以第1章为例 中间的数字形式是编号样式决定 需要将光标放在数字所在位置 选择相应形式 最后确定 就可以看到标题形式变为设置的那样
  • 百度富文本编辑器UEditor配置及功能实现详解

    当前功能基于PHP 其它语言流程大抵相同 大概流程 1 将docx文件上传到服务器中 2 使用PHPoffice PHPword实现将word转换为HTML 3 将HTML代码返回并赋值到编辑器中 1 编辑器配置修改 1 1 新增上传wor
  • POI实现Word文件转PDF

    需求 采用spire doc生成word文件后 需要加一个预览PDF的功能 可以直接采用POI对docx文件进行转换处理 public static void main String args throws Exception String
  • 通过Java编程提取Word文档的文本

    提取Word文档中的文本是一种常见的操作 便于单独获取Word文档中的内容以进行进一步的处理 分析等操作 我们可以直接复制并粘贴保存到指定文件中 但这一方法一般适用于文本内容较少时 除了费时费力地手动保存以外 我们也可以通过代码来一次性批量

随机推荐

  • iOS 已有项目利用Pod集成RN

    一 背景 对于已经存在的iOS项目 xff0c 以模块化引入 xff0c OC与RN混编怎么做呢 xff1f 我们可以利用cocopods来集成 xff0c 直接使用pod install就可以让其他同事也快速集成 由于RN用npx rea
  • 使用信号量使AFNetworking异步变同步(dispatch_semaphore_t)

    背景 当H5调用OC的时候 xff0c 默认是在主线程的 xff0c 如果H5调用后 xff0c 需要原生返回数据 xff0c 而原生获取数据又是个耗时的异步操作就会有问题 xff0c 比如OC是一个网络请求 xff0c 那就需要等原生请求
  • Alice 与 Bob 的游戏 (概率DP)

    题目描述 Alice 和 Bob 两个人正在玩一个游戏 xff0c 游戏有很多种任务 xff0c 难度为 p 的任务 xff08 p是正整数 xff09 xff0c 有 1 2 p 的概率完成并得到 2 p 1 分 xff0c 如果完成不了
  • windows搭建WINS服务

    文章目录 SDCserver WINS 1 安装WINS并配置为辅助WINS 2 DCserver为主要的WINS服务器 3 定期复制主WINS服务器的记录 4 DCserver离线后 自动切换为辅助服务器 SDCserver设备上 提示
  • iOS 内存管理

    内存管理 1 内存布局 bss xff1a 未初始化的全局变量 静态变量等data xff1a 已初始化的全局变量 静态变量等text xff1a 程序代码 内存布局 2 内存管理方案 TaggedPointer xff1a 对于小对象NS
  • isKindOfClass和isMemberOfClass

    BOOL isKindOfClass Class aClass BOOL isMemberOfClass Class aClass 我们来看看这两个方法有什么不同 xff0c 首先看看问题 BOOL res1 61 id NSObject
  • AVAudioRecorder stop崩溃 在iOS13系统上

    iOS15和iOS16都正常 xff0c 但是测试反馈在iOS13的系统上 xff0c AVAudioRecorder的实例对象调用stop方法会崩溃 xff0c 并且debug不到任何信息 原因是由于AVAudioRecorder的实例对
  • 【C++】输入优化(快读)

    快速读入 xff0c 简称快读 xff0c 比cin printf 等都快 void类型的快读 span class token macro property span class token directive keyword inclu
  • 【LaTeX】LaTeX入门

    文章目录 简介文章结构基本要素处理问题添加文档标题章节创建标签生成目录 xff08 TOC xff09 文字处理中文字体支持字体效果彩色字体字体大小段落缩进列表注释和空格特殊字符 表格图表公式插入公式数学符号上标和下标分数根号求和与积分希腊
  • C++中string的拼接

    字符拼接可以采用的方法 xff1a 1 多个字串拼接时用 43 操作符 1 xff09 代码 xff1a 如果不加红色部分的代码 xff0c 则需要采用 sntprintf代替sntprintf include lt iostream gt
  • LINUX 新挂载的磁盘(sdb,sdc)进行扩容

    1 在虚拟机上增加磁盘空间 xff0c 例如之前50G xff0c 增加到100G 2 fdisk l 查看磁盘容量是否变化 可以看出我们只用了一半的扇区 xff0c 也就是50G 3 df hl 查看现在的挂载情况 目前文件系统只有50G
  • VS各个版本对应的C++版本一览表(持续更新,最新为VS2022)

    文章目录 1 VS各版本与MSVC对照表2 GCC版本与C 43 43 支持情况表3 VS版本与C 43 43 支持情况表4 C 与 NET版本与C 43 43 支持情况表5 引用 官网地址 xff1a Visual Studio官网地址
  • 经典算法(5)- 用二进制方法实现扩展的最大公约数(Extended GCD)

    二进制方法中 xff0c 只需要移位 xff08 lt lt 和 gt gt xff09 和加减操作 xff08 43 和 xff09 xff0c 不像欧几里德算法中需要乘法和除法运算 虽然算法效率更高 xff0c 但是程序的可读性和可维护
  • shell-位置参数

    介绍 当我们执行一个shell时 xff0c 如果希望获取到命令行的参数信息 xff0c 就可以使用到位置参数变量 比如 xff1a myshell sh 100 200 这个就是一个执行shell的命令行 xff0c 获取到位置参数后 x
  • 多用户conda环境创建报错NotWritableError: The current user does not have write permissions to a required path.

    实验室最近来了一批服务器 xff0c 多个人共用一个3090 xff0c conda环境是全局安装 xff0c conda的安装目录是归属到anaconda的用户组 归属到anaconda的用户都能创建condah环境 今天在创建环境是报错
  • java自学之路

    JAVA自学之路 一 学会选择 为了就业 xff0c 不少同学参加各种各样的培训 决心做软件的 xff0c 大多数人选的是java xff0c 或是 net xff0c 也有一些选择了手机 嵌入式 游戏 3G 测试等 那么究竟应该选择什么方
  • 项目中常见的错误

    项目中遇到的错误 c9bcf64c sql错误 找不到列 Unknown column 39 fillMen 39 in 39 field list 39 2 列名在sql语句中写了2次 Column 39 fillMan 39 speci
  • Rpm包安装方法

    可以用rpm命令安装 普通安装 xff0c 进入rpm包所在目录 xff0c 运行终端程序 xff1a 或者在任意终端打rpm包的绝对路径 rpm ivh rpm 或 rpm ivh 39 root Desktop rpm 39 升级安装
  • Oracle数据库导出大字段(CLOB)数据

    导出CLOB的几个SQL语句 xff1a 1 导出含有大字段数据的M条记录 exp user passwd statistics 61 none compress 61 n consistent 61 y file 61 oradata i
  • js操作word套红

    标准版 隐藏或显示修订痕迹 function jsShowTrack value if bDocOpen alert 34 当前没有已打开的文档 34 else document all 34 SOAOfficeCtrl 34 ShowRe