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


有两种方法可以转换,一种是自己写个函数解析:

复制代码 代码如下:

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



相关阅读:
css cursor 的可选值(鼠标的各种样式)
双系统或多系统共享 windowsFonts文件夹
用Javascript实现锚点(Anchor)间平滑跳转
font和line-height之CSS代码书写顺序不同,导致显示效果不一样
ntfs硬盘整数分区计算方法解析
Jmail发邮件的例子
VMWare在2.6.20内核下编译出错的解决方法
Oracle更改默认端口号,加密监听器,限制ip访问
甲骨文穷追猛打 矛头直指SAP高管
可以生成SLEEP.EXE的延时命令的bat文件
linux下对应的windows软件
jquery的Tooltip插件 qtip使用详细说明
Zend引擎的发展 [15]
比较不错的asp模板引终极讲解(WEB开发之ASP模式)
快速导航

Copyright © 2016 phpStudy | 皖ICP备18014864号-4