今天百度了一下,看到易语言有个例子,同时还找到了一个外文网站,关于Disk Drive Dangers - SMART and WMI 的,对这些资料都看不懂。希望懂WMI操作的高手能帮助解决一下,非常感谢。
易语言的代码如下:.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 objWbemLocator, 对象
.局部变量 WMI, 对象
.局部变量 Objs, 对象
.局部变量 Obj, 对象
.局部变量 Obj2, 对象
.局部变量 Obj3, 对象
.局部变量 接口, 变体型
.局部变量 aa, 整数型
.局部变量 i, 整数型
.局部变量 VendorSpecific, 字节集
.局部变量 VendorSpecific4, 字节集
.局部变量 data, 字节集
.局部变量 SMART_Type, 字节型
objWbemLocator.创建 (“WbemScripting.SWbemLocator”, )
WMI = objWbemLocator.对象型方法 (“ConnectServer”, “.”, “root\WMI”)
Objs = WMI.对象型方法 (“ExecQuery”, “Select * from MSStorageDriver_ATAPISmartData”, , , )
.判断循环首 (_Each (Objs, 接口))
Obj2 = 接口.取对象 ().读对象型属性 (“Properties_”, )
.判断循环尾 ()
.判断循环首 (_Each (Obj2, 接口))
.如果真 (接口.取对象 ().读属性 (“Value”, ).取类型 () = 13)
.如果真 (接口.取对象 ().读文本属性 (“Name”, ) = “VendorSpecific”)
.计次循环首 (接口.取对象 ().读属性 (“Value”, ).取数组成员数 (), i)
data = 到字节集 (到字节 (接口.取对象 ().读属性 (“Value”, ).取数值 (i)))
VendorSpecific = VendorSpecific + data
.计次循环尾 ()
VendorSpecific = 取字节集右边 (VendorSpecific, 取字节集长度 (VendorSpecific) - 2)
.如果真结束
.计次循环首 (取字节集长度 (VendorSpecific) ÷ 12, i)
.如果 (i = 1)
data = 取字节集中间 (VendorSpecific, 1, 12)
.否则
data = 取字节集中间 (VendorSpecific, (i - 1) × 12 + 1, 12)
.如果结束
SMART_Type = data [1]
调试输出 (data)
' SMART详细TYPE定义请百度。
.如果真 (SMART_Type = 9) ' 使用时间
调试输出 (“硬盘已经使用了:” + 到文本 (data [7] × 256 + data [5]) + “个小时”)
.如果真结束
.如果真 (SMART_Type = 194) ' 当前温度
调试输出 (“硬盘当前温度:” + 到文本 (data [6]) + “摄氏度”)
.如果真结束
.计次循环尾 ()
.如果真结束
.判断循环尾 ()
参考的外文资料网址请点击此处。 |