脚本定时
⑴ 按键精灵定时脚本!!!!!!!!!!
把 nia878答案中的2*100改为2*1000,最好是改为2000(可以加快电脑的运算速度,虽然可以忽略不计)
⑵ 按键精灵定时运行脚本怎么弄
不知道你这里的脚本2是和脚本1一起运行,还是独立一个脚本,如果是一起运行,不需要分两个脚本都可以,因为你的脚本运行时间是3分钟,你的运行的时间间隔至少有30分钟,所以用单线程即可(假如代码执行时间比30分钟长,就得要多线程)。这里我只提供脚本1的代码,脚本2类似,脚本1代码如下:
Dim MyTime(26) //定义数组,存放27个时间
//下面给数组赋值,储存每个时间,由于时间间隔是30分钟,所以可以代码赋值。
MyTime(0) = "10:10:00"
For i = 1 To 25
MyTime(i) = DateAdd("n", 30, MyTime(i - 1))
Delay 10
Next
MyTime(26) = "00:40:00"
While True
For i = 0 To 26
dt = DateDiff("s", Time, MyTime(i))
If dt = 0 Then
//这里写你要执行的代码
End If
Delay 100
Next
Wend
⑶ 按键精灵定时脚本
H=Hour(time)
IfH=21Then
//执行语句
Delay3600000
RestartScript
Else
Delay3600000
RestartScript
EndIf
一小时检查一下电脑时间。如果是21点,就执行语句,如果不是,就等待一小时后再执行,
就是这个写法,我写的有点不严谨,你自己来优化吧。
⑷ 设置“按键精灵”设置定时自动开始脚本
AB脚本的运行时间是多少?如果A脚本的运行时间不超过十分钟那很简单,做两个子程序然后简单调用就好了,如果A脚本的运行时间在十分钟以上,那就要多线程了,多线程代码如下。
Do
Iftime="09:50:01"ortime="09:50:02"ortime="09:50:03"ortime="10:50:01"ortime="10:50:02"ortime="10:50:03"ortime="11:50:01"ortime="11:50:02"ortime="11:50:03"ortime="12:50:01"ortime="12:50:02"ortime="12:50:03"ortime="13:50:01"ortime="13:50:02"ortime="13:50:03"Then
BeginThreadA
Delay5000
EndIf
Iftime="10:00:01"ortime="10:00:02"ortime="10:00:03"ortime="11:00:01"ortime="11:00:02"ortime="11:00:03"ortime="12:00:01"ortime="12:00:02"ortime="12:00:03"ortime="13:00:01"ortime="13:00:02"ortime="13:00:03"ortime="14:00:01"ortime="14:00:02"ortime="14:00:03"Then
BeginThreadB
Delay5000
EndIf
Loop
SubA
//这里放A脚本
EndSub
SubB
//这里放B脚本
EndSub
为了保险我设了每个时间段都获取了三次时间,分别是1、2、3秒。
⑸ 如何定时运行指定的脚本
原帖由 yiguangqiang88 于 2007-11-5 11:18 发表 具体原因我不知道。不过如果要实现脚本命令,on event里面可以直接填写脚本命令而不用填写脚本名字。这样估计会达到你执行脚本的效果。我在2.9.7里面测试的。 谢谢!按照你的方法搞定了,直接在on event里面填写脚本命令而不用填写脚本名字。
⑹ 按键精灵脚本如何定时启动
1、打开按键精灵,点击新建脚本,然后会弹出空白的脚本界面。
⑺ 如何定时执行某个脚本
脚本如下:
[General]
Description=Test
BeginHotkey=121
BeginHotkeyMod=0
RunOnce=0
Enable=1
[Repeat]
Type=0
Number=1
[Comment]
Content=
[Script]
//RunTime是希望执行脚本的时间,比如晚上0:0:15.TimeNow是系统当前时间.
Dim RunTime,TimeNow,ShowStr
RunTime=CDate("16:18:00")
ShowStr = "您当前设置为" + CStr(RunTime) + "开始运行脚本"
VBSCall Call MessageBox(ShowStr)
//开始判断时间
Rem CheckTime
TimeNow = CDate(CStr(Hour(Now))+":"+CStr(Minute(Now))+":"+CStr(Second(Now)))
MyVer = DateDiff("s",TimeNow,RunTime)
If MyVer<60
Goto Main
Else
Delay 50000
Goto CheckTime
EndIf
//时间到了,开始执行正式的脚本内容
Rem Main
VBSCall Call MessageBox("时间到了,开始执行脚本!")
⑻ 按键精灵定时运行脚本
打开按键精灵,点击新建;
然后切换切换到源文件模式(这样方便复制粘贴);
Do
//填写脚本内容来这里
Delay 600000
Loop
-----------------------
把以上的代码复制,然后在源文件模式下,点击鼠标右键,选择粘贴;”//填写脚本内容来这里“把这句修改成脚本内容,保留也可以,反正把脚本放在第一句之后就行,确保写的脚本内容在Do和Loop之间就行。
还有一种,打开你的脚本,就是修改模式,然后复制第一句的”Do“在第一句那,鼠标右键点粘贴。之后复制
Delay 600000
Loop
在脚本最后一句那,就可以了。
⑼ 如何使一个脚本定时运行,比如某个确定的时间点3:20
什么 bat, cmd,vbs太次了
用VB写个定时程序就好了,很简单的,要就留下邮箱,不要就不回复