Properties

The following example shows you how to use Visual Basic Scripting Edition (VBScript) to get the properties of a connector space object with a specified GUID:

Option Explicit

On Error Resume Next

Dim Service
Dim CsObject

Set Service = GetObject("winmgmts:root\MicrosoftIdentityIntegrationServer")
Set CsObject = Service.Get(MIIS_CSObject.Guid = "'{707E0C18-5712-42A8-A8E7-19CBE8565388}'")

WScript.Echo "Guid:					" + CSObject.Guid
WScript.Echo "Dn:					" + CSObject.Dn
WScript.Echo "ObjectType:			" + CSObject.ObjectType
WScript.Echo "UserPrincipalName:	 " + CSObject.UserPrincipalName
WScript.Echo "Domain:				" + CSObject.Domain
WScript.Echo "Account:				 " + CSObject.Account
WScript.Echo "UnappliedExport:		 " + CSObject.UnappliedExportHologram
WScript.Echo "EscrowedExport:		" + CSObject.EscrowedExportHologram
WScript.Echo "UnconfirmedExport:	 " + CSObject.UnconfirmedExportHologram
WScript.Echo "PendingImport:		 " + CSObject.PendingImportHologram
WScript.Echo "Hologram:				" + CSObject.Hologram
WScript.Echo "MvGuid:				" + CSObject.MvGuid
WScript.Echo "MaGuid:				" + CSObject.MaGuid
WScript.Echo "MaName:				" + CSObject.MaName
WScript.Echo "PartitionGuid:		 " + CSObject.PartitionGuid
WScript.Echo "PartitionName:		 " + CSObject.PartitionName
WScript.Echo "PartitionDisplayName:	" + CSObject.PartitionDisplayName
WScript.Echo "PasswordChangeHistory:   " + CSObject.PasswordChangeHistory

Sub ErrorHandler (ErrorMessage)
  WScript.Echo ErrorMessage
  WScript.Quit(1)
End Sub