Question

我需要比较2个日期，以确定计算机是EOL还是非常EOL。不同类型的文本取决于它是EOL还是VEOL。

现在的日期是29-08-2016 防爆。 1 lstrValue = 31-12-2016 = 4 防爆。 2 lstrValue = 31-07-2016 = -1

select case DateDiff("m",Date,CDATE(lstrValue))
    case 1, 2, 3
        bEOL = true
    case else
        bVeryEOL = true
end select

我的例子中的问题是，如果DateDiff是4,5,6等，则bVeryEOL为真。这不是我想要的。我只是在寻找bVeryEOL是真的，如果dateiff是negativ

Answer 1

我相信你正在寻找类似的东西，然后：

编辑：更改了代码，因为之前的版本无效VBScript

Dim strResult : strResult = DateDiff("m",Date,CDATE(lstrValue))
Select case strResult
    Case 1, 2, 3
        bEOL = true
    Case Else
        If strResult < 0 Then
            bVeryEOL = True
        Else
            'add logic
        End If
End select

比较DateDiff问题

1 个答案: