按键精灵 运行时间:每天9点-17点,每逢整点和半点运行一次 ,怎么写 ?
展开全部
Dim now
Dim date(3)
Dim temp
Do
Do
绝敏 now = Time
date = Split(CStr(now), ":")
If date(0) >= 9 and date(0) <= 17 Then
If date(1) = 0 or date(1) = 30 Then
temp = True
棚贺 End If
并和枝 End If
Delay 55 * 1000
Loop Until temp = True
//你的脚本内容
Loop
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询