Win2003里用命令行刷新硬件列表,以掃描硬件改動(dòng)的實(shí)現(xiàn)代碼
更新時(shí)間:2012年05月16日 12:10:08 作者:
在Windows Server 2003里面實(shí)現(xiàn)用命令行刷新硬件列表,以掃描硬件改動(dòng),怎么實(shí)現(xiàn)
如果是想搜索新硬件,還真不知道該用什么命令。系統(tǒng)的PNP可以自動(dòng)搜索到新硬件,所以估計(jì)也沒(méi)必要手動(dòng)刷新搜索。
如果是想查看設(shè)備的變動(dòng),倒是可以用命令行來(lái)實(shí)現(xiàn)。
方法一、使用WMIC(WMI命令行)
使用WMIC需要管理員權(quán)限,第一次運(yùn)行會(huì)進(jìn)行安裝和配置。
運(yùn)行下面的命令可以把系統(tǒng)中的驅(qū)動(dòng)列表保存到sysdriver.txt:
wmic SYSDRIVER get DisplayName >sysdriver.txt
再次運(yùn)行,然后使用fc就可以判斷是否有變動(dòng)
wmic SYSDRIVER get DisplayName >sysdriver1.txt
fc sysdirver.txt sysdriver1.txt
方法二、使用WMI腳本
可以使用js或vbs來(lái)運(yùn)行腳本,不需要管理員權(quán)限。
如下方法可以得到驅(qū)動(dòng)類(lèi)表,然后就可以使用fc比較兩次運(yùn)行的結(jié)果了:
cscript //NoLogo sysdriver.vbs >sysdriver.txt
sysdriver.vbs內(nèi)容如下
VBScript code
On Error Resume Next
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
strComputer = "."
Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_SystemDriver", "WQL", _
wbemFlagReturnImmediately + wbemFlagForwardOnly)
For Each objItem In colItems
WScript.Echo objItem.DisplayName
Next
如果是想查看設(shè)備的變動(dòng),倒是可以用命令行來(lái)實(shí)現(xiàn)。
方法一、使用WMIC(WMI命令行)
使用WMIC需要管理員權(quán)限,第一次運(yùn)行會(huì)進(jìn)行安裝和配置。
運(yùn)行下面的命令可以把系統(tǒng)中的驅(qū)動(dòng)列表保存到sysdriver.txt:
復(fù)制代碼 代碼如下:
wmic SYSDRIVER get DisplayName >sysdriver.txt
再次運(yùn)行,然后使用fc就可以判斷是否有變動(dòng)
復(fù)制代碼 代碼如下:
wmic SYSDRIVER get DisplayName >sysdriver1.txt
fc sysdirver.txt sysdriver1.txt
方法二、使用WMI腳本
可以使用js或vbs來(lái)運(yùn)行腳本,不需要管理員權(quán)限。
如下方法可以得到驅(qū)動(dòng)類(lèi)表,然后就可以使用fc比較兩次運(yùn)行的結(jié)果了:
復(fù)制代碼 代碼如下:
cscript //NoLogo sysdriver.vbs >sysdriver.txt
sysdriver.vbs內(nèi)容如下
復(fù)制代碼 代碼如下:
VBScript code
On Error Resume Next
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
strComputer = "."
Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_SystemDriver", "WQL", _
wbemFlagReturnImmediately + wbemFlagForwardOnly)
For Each objItem In colItems
WScript.Echo objItem.DisplayName
Next
相關(guān)文章
VBS教程:VBscript語(yǔ)句-On Error 語(yǔ)句
VBS教程:VBscript語(yǔ)句-On Error 語(yǔ)句...2006-11-11
修復(fù)Windows上面的WScript的腳本(.vbs)不能執(zhí)行了
修復(fù)Windows上面的WScript的腳本(.vbs)不能執(zhí)行了...2007-03-03
VBS數(shù)組函數(shù)學(xué)習(xí)實(shí)例分析
VBS數(shù)組在應(yīng)用中沒(méi)有像其他語(yǔ)句那么廣泛,VBS數(shù)組存在不少功能上的局限性(如二維數(shù)組的定義、賦值),在使用上也沒(méi)有java等語(yǔ)言那么便捷2013-04-04

