MSFT_StoragePoolToResiliencySetting, ROOT\Microsoft\Windows\Storage, VB Net samples

	'Project -> Add reference -> System.Management
	'Imports System.Management
	
	'Get the namespace management scope
	Dim Scope As New ManagementScope("\\.\ROOT\Microsoft\Windows\Storage")
	
	'Get a result of WML query 
	Dim Query As New ObjectQuery("SELECT * FROM MSFT_StoragePoolToResiliencySetting Where ResiliencySetting="\\\\.\\ROOT\\Microsoft\\Windows\\Storage:MSFT_ResiliencySetting.ObjectId=\"{1}\\\\\\\\W2012SDC\\\\ROOT/Microsoft/Windows/Storage/Providers_v2\\\\SPACES_ResiliencySetting.ObjectId=\\\"{6e015502-45ee-11e4-80b5-806e6f6e6963}:RS:{6e015503-45ee-11e4-80b5-806e6f6e6963}{00000000-0000-0000-0000-000000000000}\\\"\""StoragePool="\\\\.\\ROOT\\Microsoft\\Windows\\Storage:MSFT_StoragePool.ObjectId=\"{1}\\\\\\\\W2012SDC\\\\ROOT/Microsoft/Windows/Storage/Providers_v2\\\\SPACES_StoragePool.ObjectId=\\\"{6e015502-45ee-11e4-80b5-806e6f6e6963}:SP:{6e015503-45ee-11e4-80b5-806e6f6e6963}\\\"\""")
	
	'Create object searcher
	Dim Searcher As New ManagementObjectSearcher(Scope, Query)
	
	'Get a collection of WMI objects
	Dim queryCollection As ManagementObjectCollection = Searcher.Get
	
	'Enumerate wmi object 
	For Each mObject As ManagementObject In queryCollection
	  'write out some property value
	  Console.WriteLine("ResiliencySetting : {0}", mObject("ResiliencySetting"))
	Next
	

	//https://wutils.com/wmi/
	
	//Project -> Add reference -> System.Management
	//using System.Management;
	
	//set the class name and namespace
	string NamespacePath = "\\\\.\\ROOT\\Microsoft\\Windows\\Storage";
	string ClassName = "MSFT_StoragePoolToResiliencySetting";
	
	//Create ManagementClass
	ManagementClass oClass = new ManagementClass(NamespacePath + ":" + ClassName);
	
	//Get all instances of the class and enumerate them
	foreach (ManagementObject oObject in oClass.GetInstances())
	{
		//access a property of the Management object
		Console.WriteLine("ResiliencySetting : {0}", oObject["ResiliencySetting"]);
	}