按键精灵获取当前时间段，如等于则开始脚本。 比如获取当前为星期一

Question

按键精灵获取当前时间段，如等于则开始脚本。

比如获取当前为星期一，时间段为10-23点，则开始脚本。如不等于则结束脚本！

Answer 1

Dim 当前时间
当前时间 = Now
//星期天→星期六 = 1-7
Select Case Weekday(当前时间)
Case 1, 7
    TracePrint "周末"
Case 3, 4, 5, 6
    TracePrint "周二到周四"
Case 2
    TracePrint "周一"
    If 23 >= Hour(当前时间) >= 10 Then 
        TracePrint "周一指定时段"
    Else 
        TracePrint "非指定时段"
    End If
End Select
//制作:法科按键
//时间:2017-10-08

Answer 2

可以直接调用网络时间，源码里面有，很多网站都能ping