求一段手机按键精灵定时执行的代码
发布网友
共3个回答
热心网友
你想一天到黑都开着脚本？好吧。
Dim hourDo
hour = DateTime.Format ("%H")
If hour = 8 Then
'………………
Delay 9 * 36000000
ElseIf hour = 19 Then
'………………
Delay 9 * 36000000
End If
Delay 5 * 1000'请自行调整
Loop
追问谢谢大神的回答，比如8点50分执行呢,我试过了，不行呀
Dim intX
Dim intY
Dim hour
Do
hour = DateTime.Format ("%H")
If hour = 13 Then
RunApp "xxx.app.nk"
Delay 10000
Call 登陆成功()
Delay 3600000
到时间根本就不执行下一步啊
热心网友
Dim i,j
function 定时器(时,分)
Do
i = DateTime.Hour()
j=DateTime.Minute ()
If i = 时 and j=分 Then
Exit Do
End If
delay 1000 //减小设备压力,可不要或增大
Loop
End Function
给用于特定时间启动的脚本
热心网友
看看帮助文档里面的时间函数.我也不太记得了
