Javascript实例教程(19) 使用HoTMetal(5)


Posted in Javascript onDecember 23, 2006

 

HoTMetal中使用javascript

5.怎样编写脚本来检查上次修改的日期

在本节教程中你将可以学到怎样编写一个宏来检查是否有任何的程序已经利用HoTMetaL中修改过一个文件。这个宏包括了以下几个检查的更新特性:On_Document_Open_Complete、On_Document_Activate和 On_Application_Activate。在前面的教程中,这些宏的名字已经被预定义了,所以这里不能对它们进行修改。这些名字指定了事件来触发宏。这个event-macro关联是隐含的,所以不能通过任何手段来对它进行改写。当我们打开一个文档的时候,比如On_Document_Open_Complete,它总是在完成文件打开的时候被调用的。以下是具体的定义: <MACRO name="On_Document_Open_Complete" lang="JScript"><![CDATA[

var name = ActiveDocument.LocalFullName;

if (Application.ReadableFileExists(name)) { // if document has never been saved, do nothing

Application.Run("On_Document_Save");

}

]]></MACRO>

我们首先提取当前文件夹的文件名:name = ActiveDocument.LocalFullName,然后检查可读的文件是否存在;接着我们运行宏On_Document_Save,这个宏On_Document_Save示范了微软的FileSystemObject作为ActiveX控件的使用方法,这是一个在JavaScript中。这个宏的主要思想是更新文档的LastMod属性以反应磁盘上文档的当前事件:

<MACRO name="On_Document_Save" lang="JScript"<>![CDATA[

var fso = new ActiveXObject("Scripting.FileSystemObject");

var f = fso.GetFile(ActiveDocument.LocalFullName);

var mod = Date.parse(f.DateLastModified);

var props = ActiveDocument.CustomDocumentProperties;

if (props.count != 0) {

props.Add("LastMod", mod);

}

]]></MACRO>

这个宏从FileSystemObject创建了一个ActiveX控件,它包括了微软的脚本库: var fso = new ActiveXObject("Scripting.FileSystemObject");

我们可以通过以下的语句来从磁盘得到文件的属性:f = fso.GetFile(name),然后提取出文件最后一次修改的事件:mod = Date.parse(f.DateLastModified)。我们通过调用ActiveDocument的CustomDocumentProperties 属性来创建了一个用户定义的属性集:props。然后我们利用mod属性来对这个集进行初始化,这时它的数值为"LastMode"。

HoTMetal中使用Javascript

5.怎样编写脚本来检查上次修改的日期

这个On_Document_Activate宏是检查磁盘上的文件是否有与利用HoTMetaL编辑的当前文档相同的上次修改的日期。它提示用户该做什么以防日期不匹配。以下是这个宏的具体代码:

<MACRO name="On_Document_Activate" lang="JScript" id="44" tooltip="Hide_On_Document_Activate"

desc="Runs Macro: Hide_On_Document_Activate"><![CDATA[

// Do this for local documents only

if (ActiveDocument.FullName == ActiveDocument.LocalFullName) {

var name = ActiveDocument.LocalFullName;

if (Application.ReadableFileExists(name)) { // if document has never been saved, do nothing

var fso = new ActiveXObject("Scripting.FileSystemObject");

var f = fso.GetFile(name);

var newMod = Date.parse(f.DateLastModified);

var props = ActiveDocument.CustomDocumentProperties;

if (props.count != 0) {

oldMod = props.Item("LastMod").value;

if (oldMod != newMod) {

var Yes = 6;

var No = 7;

var msg = "The disk version of this document has changed from the\n";

msg += "version in memory. Do you want to re-open the document?";

var ret = Application.MessageBox(msg, 36, "Document Changed");

if (ret == Yes) {

ActiveDocument.Reload();

}

// Reset the timestamp regardless of the user's response

// This will prevent the dialog from always showing

Application.Run("On_Document_Open_Complete");

}

}

}

}

]]></MACRO>

我们再检查文件是否装载了: ActiveDocument.FullName == ActiveDocument.LocalFullName。然后我们验证一下文件是否被保存到磁盘中: Application.ReadableFileExists(name). 类似于前面的On_Document_Open_Complete 宏,我们创建一个ActiveX控件并且提取出文件的上次修改的日期,代码如下:

var fso = new ActiveXObject("Scripting.FileSystemObject");

var f = fso.GetFile(name);

var newMod = Date.parse(f.DateLastModified);
HoTMetal中使用Javascript

5.怎样编写脚本来检查上次修改的日期

接着,我们调用当前文档的定制属性集:props = ActiveDocument.CustomDocumentProperties 并且检查这个属性的数字是否不等于零。我们已经在前面的On_Document_Open_Complete 宏中已经保存了,并将它赋值给oldMod:

oldMod = props.Item("LastMod").value

当我们发现oldMod (来自打开的文档) and newMod (来自磁盘)之间的矛盾的时候,我们应该告诉用户是否从磁盘上转载了这个文件:

var Yes = 6;

var No = 7;

var msg = "The disk version of this document has changed from the\n";

msg += "version in memory. Do you want to re-open the document?";

var ret = Application.MessageBox(msg, 36, "Document Changed");

if (ret == Yes) {

ActiveDocument.Reload();

}

最后,我们通过模仿打开的操作来重置当前文档的日期:

Application.Run("On_Document_Open_Complete");

我们想扩展这个更新特性的检查并触发它,而不管在这个文档是当前的还是当这个应用程序是当前的。这时我们可以定义On_Application_Activate宏,这个宏只是调用上面的宏:

<MACRO name="On_Application_Activate" lang="JScript"><![CDATA[

Application.Run("On_Document_Activate");

]]></MACRO>

现在我们需要复制On_Document_Save功能到On_Document_SaveAs宏:

<MACRO name="On_Document_SaveAs" lang="JScript"<>![CDATA[

Application.Run("On_Document_Save");

]]></MACRO>

最后还是对它进行一下测试吧。先在HotMetaL PRO 6.0中打开一个文档。并在你喜欢的编辑器中打开相同的文档。并在任何地方插入一个空格符再将它保存到磁盘中。当你切换到HoTMetaL应用程序,你将可以得到如图1的信息。

Javascript实例教程(19) 使用HoTMetal(5)

(图1)

Javascript 相关文章推荐
isArray()函数(JavaScript中对象类型判断的几种方法)
Nov 26 Javascript
我的javascript 函数链之演变
Apr 07 Javascript
关于页面嵌入swf覆盖div层的问题的解决方法
Feb 11 Javascript
jQuery中trigger()方法用法实例
Jan 19 Javascript
使用jquery.qrcode.min.js实现中文转化二维码
Mar 11 Javascript
Bootstrap组件(一)之菜单
May 11 Javascript
jQuery实现的鼠标滚轮控制图片缩放功能实例
Oct 14 jQuery
在layui.use 中自定义 function 的正确方法
Sep 16 Javascript
微信小程序动态添加和删除组件的现实
Feb 28 Javascript
javascript利用键盘控制小方块的移动
Apr 20 Javascript
vue 项目软键盘回车触发搜索事件
Sep 09 Javascript
Vue实现简易购物车页面
Dec 30 Vue.js
Javascript实例教程(19) 使用HoTMetal(4)
Dec 23 #Javascript
Javascript实例教程(19) 使用HoTMetal(3)
Dec 23 #Javascript
Javascript实例教程(19) 使用HoTMetal(2)
Dec 23 #Javascript
Javascript实例教程(19) 使用HoTMetal(1)
Dec 23 #Javascript
用于自动添加Digg This!按钮的JavaScript
Dec 23 #Javascript
获取任意Html元素与body之间的偏移距离 offsetTop、offsetLeft (For:IE5+ FF1 )[
Dec 22 #Javascript
获取Javscript执行函数名称的方法
Dec 22 #Javascript
You might like
浅析51个PHP处理字符串的函数
2013/08/02 PHP
php实现检查文章是否被百度收录
2015/01/27 PHP
php将HTML表格每行每列转为数组实现采集表格数据的方法
2015/04/03 PHP
php版微信公众平台接口开发之智能回复开发教程
2016/09/22 PHP
PHP+MySQL使用mysql_num_rows实现模糊查询图书信息功能
2018/05/31 PHP
php利用array_search与array_column实现二维数组查找
2019/07/08 PHP
Gambit vs CL BO3 第三场 2.13
2021/03/10 DOTA
javascript 匿名函数的理解(透彻版)
2010/01/28 Javascript
jQuery版Tab标签切换
2011/03/16 Javascript
关于ExtJS4.1:快捷键支持的问题
2013/04/24 Javascript
JS操作数据库的实例代码
2013/10/17 Javascript
Backbone.js的Hello World程序实例
2015/06/19 Javascript
深入理解setTimeout函数和setInterval函数
2016/05/20 Javascript
JavaScript里 ==与===区别详解
2016/08/16 Javascript
jquery判断类型是不是number类型的实例代码
2016/10/07 Javascript
jquery实现自适应banner焦点图
2017/02/16 Javascript
微信小程序全选多选效果实现代码解析
2020/01/21 Javascript
vue相同路由跳转强制刷新该路由组件操作
2020/08/05 Javascript
[48:45]Ti4 循环赛第二日 NEWBEE vs EG
2014/07/11 DOTA
python中logging库的使用总结
2017/10/18 Python
python3.6 +tkinter GUI编程 实现界面化的文本处理工具(推荐)
2017/12/20 Python
Python字典创建 遍历 添加等实用基础操作技巧
2018/09/13 Python
关于jupyter打开之后不能直接跳转到浏览器的解决方式
2020/04/13 Python
Python根据字典的值查询出对应的键的方法
2020/09/30 Python
css3 线性渐变和径向渐变示例附图
2014/04/08 HTML / CSS
英国排名第一的最新设计师品牌手表独立零售商:TIC Watches
2016/09/24 全球购物
Perfume’s Club澳大利亚官网:西班牙领先的在线美容店
2021/02/01 全球购物
《三亚落日》教学反思
2014/04/26 职场文书
优秀共产党员先进事迹材料
2014/05/06 职场文书
党员领导干部承诺书
2014/05/28 职场文书
数学兴趣小组活动总结
2014/07/08 职场文书
售房协议书范本2014
2014/10/23 职场文书
党的群众路线教育实践活动个人整改落实情况汇报
2014/10/28 职场文书
西安兵马俑导游词
2015/02/02 职场文书
单身证明格式样本
2015/06/15 职场文书
goland 清除所有的默认设置操作
2021/04/28 Golang