快活林资源网 Design By www.csstdc.com
问:
您好,脚本专家!如何在 HTA 中暂停脚本?
-- TJ
答:
您好,TJ。您知道,从古至今,人们已经花费了巨大的时间和精力来探索生命的意义。脚本专家却从未参与其中。为什么?好吧,先不说懒,我们知道那无关紧要:就算您的确找到了生命的意义,也没人在乎它。没人想知道我们存在的理由;相反,他们 - 同您一样 - 只想知道到底如何才能暂停一个嵌入在 HTML 应用程序 (HTA) 中的脚本。那才是脚本专家为之献身的事业。
现在,如果您不熟悉 HTA,您首先想到的可能是“使用 Wscript.Sleep 即可”。(顺便说一句,如果您不熟悉 HTA,可以浏览 HTA Developers Center(英文)。)这是个好主意,但却无法实现。为什么?因为 Wscript 对象是个稍微有些独特的对象;原因之一是您实际上并不能创建此对象的实例。而只要您运行在 Windows Script Host 之下,Wscript 即会自动为您提供。问题就在这里:当您在 HTA 内部运行代码时,您并没有运行在 Windows Script Host 之下。您其实是运行在 Internet Explorer 所提供的脚本宿主之下。因为您没有运行在 Windows Script Host 之下,因此您无法自动访问 Wscript 对象,而且因为您无法创建自己的 Wscript 对象,也就无法访问 Wscript.Sleep。用高科技术语来讲,就是“瘫痪”了。
如果 Internet Explorer 提供类似于 Wscript.Sleep 的方法,则这也不是什么大不了的问题;很不幸,它没有提供。那么是否有某种神奇的解决方法,我们可以使用它来代替 Sleep 方法呢?这有必要问吗?
[Ctrl+A 全选 注:引入外部Js需再刷新一下页面才能执行]
我们的 HTA 非常简单:它只由一个按钮组成,单击时会运行名为 Test 的子例程。很了不起,对不对?好吧,我们先看看 HTA 的 <SCRIPT> 部分,然后再确定它是不是真的很了不起。
我们在 <SCRIPT> 部分所做的第一件事就是声明一个名为 dtmStartTime 的全局变量:
Dim dtmStartTime
这其实对于暂停脚本没有任何作用;我们只是利用此变量帮助我们查看脚本是否的确象所期待的那样暂停。如果您现在还没有明白其含义,别急:很快就会清楚。
接下来是 Test 子例程,在我们单击按钮时调用它:
Sub Test
dtmStartTime = Now
idTimer = window.setTimeout("PausedSection", 5000, "VBScript")
End Sub
请注意,此子例程中仅有两行代码。在第一行中,我们只是将当前的时间和日期(使用 Now 函数)赋予变量 dtmStartTime。接下来是下面这行代码:
idTimer = window.setTimeout("PausedSection", 5000, "VBScript")
无论您相信与否,这就是我们实现 Sleep 方法函数的方式。我们使用 setTimeout 方法创建了一个定时器,其 ID 为 idTimer。正如您所看到的,我们将三个参数传递给 setTimeout:
? PausedSection。此参数为定时器到时后我们要运行的子例程的名称。
? 5000。此参数为在调用 PausedSection 之前我们希望定时器等待的时间(以毫秒计;5000 毫秒等于5 秒)。换句话说,这就是我们需要的暂停。如果需要将脚本暂停 30 秒,则可将此参数设置为 30000。
? VBScript。此参数是必需的,它只是告诉脚本 PausedSection 是用 VBScript 编写的。
即,我们单击按钮时,Test 子例程将运行。Test 子例程运行时,它将创建名为 idTimer 的定时器。idTimer 的唯一功能就是等待 5 秒然后调用子例程 PausedSection。明白了吗?好的。
那么子例程 PausedSection 执行什么操作?显然,我们可以运行任何希望的代码;简单起见,在此我们仅做两件事情。首先,显示一个消息框,它显示我们单击此按钮的时间及消息框自身实际显示在屏幕上的时间:
Msgbox dtmStartTime & vbCrLf & Now
若允许舍入误差,这两个时间的间隔应为 5 秒。这重要吗?当然重要。请记住,在 PausedSection 子例程内部首先发生的就是显示此消息框。如果此消息框在我们单击按钮 5 秒之后显示,则表明我们的脚本暂停了 5 秒。您可能会记起,这就是我们的最终目的。
我们在 PausedSection 子例程中要做的另外一件事情就是调用 clearTimeout 方法来有效地清除定时器:
window.clearTimeout(idTimer)
为什么这样做?原因很简单:定时器是设计为永远运行的。如果不清除定时器,每 5 秒钟 idTimer 就将调用 PausedSection 子例程一次,因此每 5 秒钟我们的这个小消息框就会在屏幕上弹出一次。我们真的不希望每 5 秒钟就看到这样的消息框,因此使用 clearTimeout 删除定时器。
我们承认,这确实不如使用 Wscript.Sleep 5000 那么简单;这表明在您启用和禁用定时器之前可能不得不稍稍掂量一番。因此,这或许带点挑战,但是,别忘了,这不也是生命的全部意义所在吗?
不,这不是一个反问句。正如我们所说,我们一直致力于暂停 HTA;除此之外,我们就不知道生命到底是什么了。
您好,脚本专家!如何在 HTA 中暂停脚本?
-- TJ
答:
您好,TJ。您知道,从古至今,人们已经花费了巨大的时间和精力来探索生命的意义。脚本专家却从未参与其中。为什么?好吧,先不说懒,我们知道那无关紧要:就算您的确找到了生命的意义,也没人在乎它。没人想知道我们存在的理由;相反,他们 - 同您一样 - 只想知道到底如何才能暂停一个嵌入在 HTML 应用程序 (HTA) 中的脚本。那才是脚本专家为之献身的事业。
现在,如果您不熟悉 HTA,您首先想到的可能是“使用 Wscript.Sleep 即可”。(顺便说一句,如果您不熟悉 HTA,可以浏览 HTA Developers Center(英文)。)这是个好主意,但却无法实现。为什么?因为 Wscript 对象是个稍微有些独特的对象;原因之一是您实际上并不能创建此对象的实例。而只要您运行在 Windows Script Host 之下,Wscript 即会自动为您提供。问题就在这里:当您在 HTA 内部运行代码时,您并没有运行在 Windows Script Host 之下。您其实是运行在 Internet Explorer 所提供的脚本宿主之下。因为您没有运行在 Windows Script Host 之下,因此您无法自动访问 Wscript 对象,而且因为您无法创建自己的 Wscript 对象,也就无法访问 Wscript.Sleep。用高科技术语来讲,就是“瘫痪”了。
如果 Internet Explorer 提供类似于 Wscript.Sleep 的方法,则这也不是什么大不了的问题;很不幸,它没有提供。那么是否有某种神奇的解决方法,我们可以使用它来代替 Sleep 方法呢?这有必要问吗?
[Ctrl+A 全选 注:引入外部Js需再刷新一下页面才能执行]
我们的 HTA 非常简单:它只由一个按钮组成,单击时会运行名为 Test 的子例程。很了不起,对不对?好吧,我们先看看 HTA 的 <SCRIPT> 部分,然后再确定它是不是真的很了不起。
我们在 <SCRIPT> 部分所做的第一件事就是声明一个名为 dtmStartTime 的全局变量:
Dim dtmStartTime
这其实对于暂停脚本没有任何作用;我们只是利用此变量帮助我们查看脚本是否的确象所期待的那样暂停。如果您现在还没有明白其含义,别急:很快就会清楚。
接下来是 Test 子例程,在我们单击按钮时调用它:
Sub Test
dtmStartTime = Now
idTimer = window.setTimeout("PausedSection", 5000, "VBScript")
End Sub
请注意,此子例程中仅有两行代码。在第一行中,我们只是将当前的时间和日期(使用 Now 函数)赋予变量 dtmStartTime。接下来是下面这行代码:
idTimer = window.setTimeout("PausedSection", 5000, "VBScript")
无论您相信与否,这就是我们实现 Sleep 方法函数的方式。我们使用 setTimeout 方法创建了一个定时器,其 ID 为 idTimer。正如您所看到的,我们将三个参数传递给 setTimeout:
? PausedSection。此参数为定时器到时后我们要运行的子例程的名称。
? 5000。此参数为在调用 PausedSection 之前我们希望定时器等待的时间(以毫秒计;5000 毫秒等于5 秒)。换句话说,这就是我们需要的暂停。如果需要将脚本暂停 30 秒,则可将此参数设置为 30000。
? VBScript。此参数是必需的,它只是告诉脚本 PausedSection 是用 VBScript 编写的。
即,我们单击按钮时,Test 子例程将运行。Test 子例程运行时,它将创建名为 idTimer 的定时器。idTimer 的唯一功能就是等待 5 秒然后调用子例程 PausedSection。明白了吗?好的。
那么子例程 PausedSection 执行什么操作?显然,我们可以运行任何希望的代码;简单起见,在此我们仅做两件事情。首先,显示一个消息框,它显示我们单击此按钮的时间及消息框自身实际显示在屏幕上的时间:
Msgbox dtmStartTime & vbCrLf & Now
若允许舍入误差,这两个时间的间隔应为 5 秒。这重要吗?当然重要。请记住,在 PausedSection 子例程内部首先发生的就是显示此消息框。如果此消息框在我们单击按钮 5 秒之后显示,则表明我们的脚本暂停了 5 秒。您可能会记起,这就是我们的最终目的。
我们在 PausedSection 子例程中要做的另外一件事情就是调用 clearTimeout 方法来有效地清除定时器:
window.clearTimeout(idTimer)
为什么这样做?原因很简单:定时器是设计为永远运行的。如果不清除定时器,每 5 秒钟 idTimer 就将调用 PausedSection 子例程一次,因此每 5 秒钟我们的这个小消息框就会在屏幕上弹出一次。我们真的不希望每 5 秒钟就看到这样的消息框,因此使用 clearTimeout 删除定时器。
我们承认,这确实不如使用 Wscript.Sleep 5000 那么简单;这表明在您启用和禁用定时器之前可能不得不稍稍掂量一番。因此,这或许带点挑战,但是,别忘了,这不也是生命的全部意义所在吗?
不,这不是一个反问句。正如我们所说,我们一直致力于暂停 HTA;除此之外,我们就不知道生命到底是什么了。
快活林资源网 Design By www.csstdc.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
快活林资源网 Design By www.csstdc.com
暂无评论...
《魔兽世界》大逃杀!60人新游玩模式《强袭风暴》3月21日上线
暴雪近日发布了《魔兽世界》10.2.6 更新内容,新游玩模式《强袭风暴》即将于3月21 日在亚服上线,届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。
艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕,并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时,他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中,玩家将会进入一个全新的海盗主题大逃杀式限时活动,其中包含极高的风险和史诗级的奖励。
《强袭风暴》不是普通的战场,作为一个独立于主游戏之外的活动,玩家可以用大逃杀的风格来体验《魔兽世界》,不分职业、不分装备(除了你在赛局中捡到的),光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式,玩家在加入海盗主题的预赛大厅区域前,可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹,《巨龙崛起》和《魔兽世界:巫妖王之怒 经典版》的玩家都可以获得奖励。
更新日志
2024年12月22日
2024年12月22日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]