將WMI中的DateTime類型轉(zhuǎn)換成VBS時(shí)間的函數(shù)代碼
更新時(shí)間：2011年02月03日 15:29:58 作者：
WMI中的DateTime數(shù)據(jù)類型保存的時(shí)間格式是UTC，與VBS中的時(shí)間類型不同。
有兩種方法可以轉(zhuǎn)換，一種是自己寫個(gè)函數(shù)解析：
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對(duì)象
Function WMIDateStringToDate(DateTime)
Set WbemDateTime = _
CreateObject("WbemScripting.SWbemDateTime")
WbemDateTime.Value = DateTime
WMIDateStringToDate = WbemDateTime.GetVarDate()
End Function
復(fù)制代碼 代碼如下:
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對(duì)象
復(fù)制代碼 代碼如下:
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獲取系統(tǒng)硬件和軟件有關(guān)信息
- VBS調(diào)用WMI遍歷搜索硬盤文件并計(jì)數(shù)的方法
- vbs通過WMI修改文件文件夾的NTFS權(quán)限
- WMI StdRegProv 通過wmi操作注冊(cè)表的vbscript實(shí)現(xiàn)代碼 (本地或遠(yuǎn)程)
- VBS通過WMI監(jiān)視注冊(cè)表變動(dòng)的代碼
- VBS通過WMI獲取CPU使用率的代碼
- VBS調(diào)用WMI實(shí)現(xiàn)搜索硬盤mp3文件
- Rcmd.vbs [Remote Cmd with wmi]遠(yuǎn)程腳本
- VBS調(diào)用WMI快速關(guān)閉IE的腳本
- VBS腳本使用WMI操作注冊(cè)表的代碼
- vbs wmi獲取電腦硬件信息實(shí)例
- 初窺WMI_Vbs腳本編程簡(jiǎn)明教程補(bǔ)充讀物
- 使用WMI得到計(jì)算機(jī)的信息
相關(guān)文章
用vbs模擬的一個(gè)asp的分頁顯示功能...2007-03-03
即Grade school multiplication（小學(xué)乘法？）算法的VBS實(shí)現(xiàn)。2011-01-01
VBScript的入門學(xué)習(xí)資料...2006-11-11
VBS教程：函數(shù)-Date 函數(shù)...2006-11-11
利用vbs自動(dòng)修改ip的代碼...2007-03-03
windows腳本調(diào)試howto的方法...2007-04-04
用vbs檢索在運(yùn)行對(duì)話框中鍵入的一系列命令的代碼
用vbs檢索在運(yùn)行對(duì)話框中鍵入的一系列命令的代碼...2007-03-03
依靠135端口，用wmi。像下邊的腳本是得到共享目錄ttt的物理目錄,依靠445端口，靠smb。bt5下的 nmap2012-05-05
百度抽風(fēng)，老是把吃掉行首空格，導(dǎo)致代碼沒有縮進(jìn)，用下面的代碼即可2011-12-12
VBS創(chuàng)建正則表達(dá)式對(duì)象的兩種方法
貌似我看過的 VBScript 書籍沒有一本介紹過這種寫法，當(dāng)然，書上沒寫的東西還有很多2012-01-01