|
5精币
我用CSDN 的AI 生成的源码如下:‘////////////////////////////////////////////////////////////////////////////////////
.版本 2
.子程序 _启动窗口_创建完毕
定义 对象, wmiService
定义 cha询结果, queryResult
定义 单个结果, singleResult
定义 状态, status
' 创建WMI服务对象
wmiService = 创建COM对象 (“WbemScripting.SWbemLocator”).ConnectServer (“.”, “root\CIMV2\Security\MicrosoftVolumeEncryption”)
' cha询加密卷信息
queryResult = wmiService.ExecQuery (“SELECT * FROM Win32_EncryptableVolume”)
' 遍历cha询结果
如果 (queryResult.Count > 0)
遍历 到 (queryResult.Count) i
singleResult = queryResult.ItemIndex (i - 1)
状态 = singleResult.GetProtectionStatus ()
调试输出 (“卷: ” + singleResult.DeviceID + “, BitLocker状态: ” + 状态)
结束遍历
否则
调试输出 (“未找到任何加密卷信息。”)
结束如果
返回 ()
.子程序
‘////////////////////////////////////////////////////////////////////////////////////
我不太懂WMI,但是我有一份之前 WMI获取系统虚拟化的源码,有没有懂的人出手帮忙改下 ,获取磁盘Bitlocker锁状态
源码在下面,会的朋友可否帮忙改一下
|
-
-
1.e
5.31 KB, 下载次数: 0, 下载积分: 精币 -1 枚
|