在Visual Basic中检查Bitlocker加密状态

Question

我试图通过Visual Basic在Visual Studio中构建一个应用程序,并提取当前机器的信息.基本上,我想要做的是在Visual Basic中拉出Bitlocker的加密状态,如果C:Drive是Bitlocked或者不是Bitlocked,则输出.

我在互联网上寻找完成此功能的东西,但我看到的一切都与WMI有关.WMI也需要安装在您将使用它的每台机器上.我只是希望能够在机器运行文件后进入机器并将所有信息输出到表单中.我现在提取所有内容的代码如下:

Public Class ComputerInformation
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        TextBoxComputerName.Text = Environment.MachineName
        TextBoxOSVersion.Text = System.Environment.OSVersion.ToString
        TextBoxOSFullName.Text = My.Computer.Info.OSFullName
        TextBoxCurrentUser.Text = System.Environment.UserName
        TextBox64Bit.Text = System.Environment.Is64BitOperatingSystem
        TextBoxSystemDirectory.Text = System.Environment.SystemDirectory
        TextBoxDomain.Text = System.Environment.UserDomainName
        ' CHECK BITLOCKER STATUS HERE.
    End Sub
End Class

一些帮助,也许一个解释将不胜感激!谢谢!

Answer 1

是的,您使用Win32_EncryptableVolume WMI类进行查询.该ProtectionStatus属性会告诉您是否已启用加密.WMI并没有必须安装.但是,只有在计算机上存在Bitlocker时,Win32_EncryptableVolume类才可用.

首先,请先下载WMI Code Creator实用程序.它允许您使用WMI查询,并将自动生成您需要的VB.NET代码并进行测试.在菜单中,使用代码语言并选择"Visual Basic.NET".从Classes组合框中选择Win32_EncyptableVolume并选择ProtectionStatus属性.单击"执行代码"进行测试.将生成的源代码复制/粘贴到您的程序中.还要检查没有Bitlocker可用的机器上的代码,你需要捕获你得到的异常,这样你才知道Bitlocker根本不存在.