有两种方法可以转换，一种是自己写个函数解析：
复制代码 代码如下:
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
您可能感兴趣的文章:
- VB中使用WMI获取系统硬件和软件有关信息
- VBS调用WMI遍历搜索硬盘文件并计数的方法
- vbs通过WMI修改文件文件夹的NTFS权限
- WMI StdRegProv 通过wmi操作注册表的vbscript实现代码 (本地或远程)
- VBS通过WMI监视注册表变动的代码
- VBS通过WMI获取CPU使用率的代码
- VBS调用WMI实现搜索硬盘mp3文件
- Rcmd.vbs [Remote Cmd with wmi]远程脚本
- VBS调用WMI快速关闭IE的脚本
- VBS脚本使用WMI操作注册表的代码
- vbs wmi获取电脑硬件信息实例
- 初窥WMI_Vbs脚本编程简明教程补充读物
- 使用WMI得到计算机的信息
本文由 华域联盟 原创撰写：华域联盟 » 将WMI中的DateTime类型转换成VBS时间的函数代码
转载请保留出处和原文链接：https://www.cnhackhy.com/16058.htm
