| 标题 | VBScript根据盘符找设备名的代码 |
| 内容 | 这篇文章主要介绍了vbs下通过盘符找设备名的实现代码,需要的朋友可以参考下 代码如下: 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 |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。