复制代码 代码如下:
on error resume next
strcomputer = "."
set objwmiservice = getobject("winmgmts:\\" & strcomputer & "\root\cimv2")
set colitems = objwmiservice.execquery( _
"associators of {win32_logicaldisk.deviceid='g:'} where resultclass=win32_diskpartition")
for each objitem in colitems
targetindex = objitem.diskindex
set items = objwmiservice.execquery( _
"select * from win32_diskdrive where deviceid like '%" & objitem.diskindex & "'",,48)
for each item in items
wscript.echo "model: " & item.model
next
next
您可能感兴趣的文章:
如您对本文有疑问或者有任何想说的,请点击进行留言回复,万千网友为您解惑!
网友评论