首页 > Web开发 > 详细

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

时间:2016-02-07 11:07:05      阅读:305      评论:0      收藏:0      [点我收藏+]
有两种方法可以转换,一种是自己写个函数解析:
复制代码 代码如下:

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

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

原文:http://www.jb51.net/article/26207.htm

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!