当前位置 博文首页 > 将WMI中的DateTime类型转换成VBS时间的函数代码

    将WMI中的DateTime类型转换成VBS时间的函数代码

    作者:admin 时间:2021-02-13 15:02

    有两种方法可以转换,一种是自己写个函数解析:
    复制代码 代码如下:

    Function WMIDateStringToDate(DateTime)
    WMIDateStringToDate = _
    CDate(Mid(DateTime, 5, 2) &_
    "/" &_
    Mid(DateTime, 7, 2) &_
    "/" &_
    Left(DateTime, 4) &_
    " " &_
    Mid (DateTime, 9, 2) &_
    ":" &_
    Mid(DateTime, 11, 2) &_
    ":" &_
    Mid(DateTime, 13, 2))
    End Function

    另一种是使用SWbemDateTime对象
    复制代码 代码如下:

    Function WMIDateStringToDate(DateTime)
    Set WbemDateTime = _
    CreateObject("WbemScripting.SWbemDateTime")
    WbemDateTime.Value = DateTime
    WMIDateStringToDate = WbemDateTime.GetVarDate()
    End Function

    参考链接:It's About Time (Oh, and About Dates, Too)
    原文:http://demon.tw/programming/wmi-datetime-vbs.html

    js
    下一篇:没有了