vbscript中的时间间隔之间的时间

Question

我正在尝试使用VBScript来调整时间读取字符串位于指定的时间间隔之间。以下是剧本：

dim splitString, currentTime
splitString = Split("12 59 00")
currentTime = TimeSerial(splitString(0),splitString(1), splitString(2))
If ((DateAdd("n",-1,time())) <= currentTime < DateAdd("n", 1,time())) Then 
    Wscript.Echo currentTime
End If  

这似乎不起作用。即使当前时间超出时间间隔，也会获得回声。

Answer 1

在Python中，您可以使用短

来检查'在一个间隔内'

if x <= y < z:
    ...

但是在VBScript中你需要更长的时间

If x <= y And y < z Then
   ...

Answer 2

您需要独立评估这两个条件。

@if(!empty($p -> $myObject -> name)) ...SHOW STUFF... @endif

Answer 3

我使用了DateDiff。将IF语句修改为：

If (DateDiff("n",DateAdd("n",-1,time()),currentTime) = 1 AND  DateDiff("n",currentTime,DateAdd("n",1,time())) = 1) Then 
    Wscript.Echo currentTime
End If

按预期工作。