How to get some information on Bitlocker using Visual Basic and WMI?
I have been asked on my post about How to get some information on Bitlocker using VBScript and WMI? if I could provide a solution using Visual Basic. Here it is: Imports System.Management 'Need to add System.Management reference to solution Module Module1 Sub Main() Dim arEncryptionMethod = {"None", "AES 128 With Diffuser", "AES 256 With Diffuser", "AES 128", "AES 256"} Dim arProtectionStatus = {"Protection Off", "Protection On", "Protection Unknown"} Dim arConversionStatus = {"Fully Decrypted",...
Read MoreVarious issues after installing Windows Management Framework 3.0 (KB2506143) on computer running SCCM 2012 agent
Last week I experienced some issues after installing Windows Management Framework 3.0 (KB2506143). I could not manage my Hyper-V Servers (the console kept saying there was no Hyper-V role installed on that server), group policies were not applied and WMI did not work. Group Policy Error in System eventlog (id 1065): The processing of Group Policy failed. Windows could not evaluate the Windows Management Instrumentation (WMI) filter for the Group Policy object CN={AD443F1C-C1B4-201A-B38E-CF596AB23FE6},CN=Policies,CN=System,DC=normanbauer,DC=com. This could be caused by RSOP being disabled or...
Read MoreHow to change BitLocker recovery password with vbScript?
Related to my last post about how to change BitLocker recovery password from an elevated command prompt here is how you can achieve the same result with vbScript and WMI. This script is from Microsoft TechNet: BitLocker Drive Encryption Operations Guide: Recovering Encrypted Volumes with AD DS. ' Target drive letter strDriveLetter = "c:" ' Target computer name ' Use "." to connect to the local computer strComputerName = "." ' -------------------------------------------------------------------------------- ' Connect to the BitLocker WMI provider class '...
Read MoreHow to access WMI namespaces on remote computers that require encryption?
When you have a look at my vbscript bitlocker post and try to use it on remote machines you may not get any results but an application eventlog entry similar to this one here: Event Source: WinMgmt Event ID: 5605 Access to the […] namespace was denied. The namespace is marked with RequiresEncryption but the client connection was attempted with an authentication level below Pkt_Privacy. Re try the connection using Pkt_Privacy authentication level. When using security related namespaces on remote machines you need to connect to wmi using a higher authentication level: strComputer =...
Read MoreHow to get some information on Bitlocker using VBScript and WMI?
strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2\Security\MicrosoftVolumeEncryption") Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_EncryptableVolume",,48) Dim arEncryptionMethod arEncryptionMethod = Array("None", "AES 128 With Diffuser", "AES 256 With Diffuser", "AES 128", "AES 256") Dim arProtectionStatus arProtectionStatus = Array("Protection Off", "Protection On", "Protection Unknown") Dim arConversionStatus arConversionStatus = Array("Fully Decrypted", "Fully Encrypted", "Encryption In Progress", "Decryption In Progress",...
Read MoreTape Label Studio
Buy Tape Label Studio one time – create hundreds of free backup tape barcode labels anytime.
Once you got a license, it’s yours to keep. No monthly fee.
For more information on Tape Label Studio visit www.tapelabelstudio.com
Recent Comments