Vbscript如何找到給定日期格式？

Question

我想知道vbscript中給定日期的格式是什么？ 例

如果日期是2015年10月8日，我想檢查它的格式是什么？

dd / mm / yyyy或dd / mm / yy

我檢查了這么多功能是vbs不能滿足我的要求

Answer 1

以下功能在某些情況下可能有用。 它可以在可能的情況下區分dd / mm / yyyy和mm / dd / yyyy，並在不知道時告訴您。 它不進行錯誤檢查，因此，如果字符串不是有效日期，則使用以下兩種格式之一會產生誤導的結果：

Function FormatUsed(dateString)
    Dim parts, first, second

    parts = Split(dateString, "/")
    first = CInt(parts(0))
    second = CInt(parts(1))

    If first > 12 Then
        FormatUsed = "dd/mm/yyyy"
    ElseIf second > 12 Then
        FormatUsed = "mm/dd/yyyy"
    Else
        FormatUsed = "??/??/yyyy"
    End If
End Function