將WMI中的DateTime類型轉(zhuǎn)換成VBS時間的函數(shù)代碼
更新時間:2011年02月03日 15:29:58 作者:
WMI中的DateTime數(shù)據(jù)類型保存的時間格式是UTC,與VBS中的時間類型不同。
有兩種方法可以轉(zhuǎn)換,一種是自己寫個函數(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對象
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對象
復(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遍歷搜索硬盤文件并計數(shù)的方法
- vbs通過WMI修改文件文件夾的NTFS權(quán)限
- WMI StdRegProv 通過wmi操作注冊表的vbscript實現(xiàn)代碼 (本地或遠程)
- VBS通過WMI監(jiān)視注冊表變動的代碼
- VBS通過WMI獲取CPU使用率的代碼
- VBS調(diào)用WMI實現(xiàn)搜索硬盤mp3文件
- Rcmd.vbs [Remote Cmd with wmi]遠程腳本
- VBS調(diào)用WMI快速關(guān)閉IE的腳本
- VBS腳本使用WMI操作注冊表的代碼
- vbs wmi獲取電腦硬件信息實例
- 初窺WMI_Vbs腳本編程簡明教程補充讀物
- 使用WMI得到計算機的信息
相關(guān)文章
用vbs實現(xiàn)修改dns的網(wǎng)關(guān)腳本
這篇文章主要為大家介紹了用vbs實現(xiàn)修改dns的代碼,需要的朋友可以參考下2008-05-05VBS基礎(chǔ)篇 - vbscript動態(tài)數(shù)組
VBS中的動態(tài)數(shù)組需要使用System.Collections.ArrayList,需要的朋友可以參考下2018-05-05獲取外網(wǎng)IP并發(fā)送到指定郵箱的vbs代碼[已測]
如名稱所見,獲取外網(wǎng)IP并發(fā)送到指定郵箱,這個腳本比較短小,但不如腳本之家提供的au3腳本功能強大,不過每次電腦開機記錄一下還是不錯的2012-05-05用vbs實現(xiàn)自動檢查代理是否可用,并自動設(shè)置IE代理的腳本
每次用代理網(wǎng)站,找了很多代理地址,大部分是不可以用的,但是可不可用,要手工一個個的試,有點麻煩,下面代碼幫你解決這個問題2008-06-06