View difference between Paste ID: NSn2RAeB and 6XJSghkD

 # Get all Clusters
 $allclusters = Get-Cluster
 
 # Iterate for each cluster and generate and save the vCenter Network map visio diagram.
 foreach ($cluster in $allclusters)
 
 {
 
 
 $shpFile1 = "VMware EUC Visio Stencils 2015.vss"
 
 #VISIO Function for the Connection-of-objects
 function connect-visioobject ($firstObj, $secondObj)
 {
     $shpConn = $pagObj.Drop($pagObj.Application.ConnectorToolDataObject, 0, 0)
     #// Connect its Begin to the 'From' shape:
     $connectBegin = $shpConn.CellsU("BeginX").GlueTo($firstObj.CellsU("PinX"))
     #// Connect its End to the 'To' shape:
     $connectEnd = $shpConn.CellsU("EndX").GlueTo($secondObj.CellsU("PinX"))
 }
 
 #VISIO Function for adding the object into the drawing
 function add-visioobject ($mastObj, $item)
 {
          Write-Host "Adding $item"
         # Drop the selected stencil on the active page, with the coordinates x, y
           $shpObj = $pagObj.Drop($mastObj, $x, $y)
         # Enter text for the object
           $shpObj.Text = $item
         #Return the visioobject to be used
         return $shpObj
  }
 
 # Create VI Properties to extract vmtype
 
 New-VIProperty -Name GuestFamily -ObjectType VirtualMachine -ValueFromExtensionProperty 'guest.guestfamily' -Force | Out-Null
 New-VIProperty -Name GuestOSType -ObjectType VirtualMachine -ValueFromExtensionProperty 'guest.guestfullname' -Force | Out-Null
 
 
 # Create an instance of Visio and create a document based on the Basic Diagram template.
 $AppVisio = New-Object -ComObject Visio.Application
 $docsObj = $AppVisio.Documents
 $DocObj = $docsObj.Add("Basic Network Diagram.vst")
 
 # Set the active page of the document to page 1
 $pagsObj = $AppVisio.ActiveDocument.Pages
 $pagObj = $pagsObj.Item(1)
 
 # Load a set of stencils and select one to drop
 $stnPath = [system.Environment]::GetFolderPath('MyDocuments') + "\My Shapes\"
 $stnObj1 = $AppVisio.Documents.Add($stnPath + $shpFile1)
 $VirtualMachine = $stnobj1.Masters.item("Virtual Machine (3D)")
 $VirtualAppliance = $stnobj1.Masters.item("3D Virtual Appliance")
 $vSphere = $stnobj1.Masters.item("vSphere")
 $Clusters = $stnobj1.Masters.item("Clusters 2")
 $VMware_Host=$stnobj1.Masters.item("VMware Host")
 $datastores=$stnobj1.Masters.item("Disks 1")
 
 #Connect-VIServer "Your vCenter Name" -Credential (Get-Credential)
 
 $allNODES = Get-Cluster $cluster | get-vmhost
 $allclusters = Get-Cluster $cluster
 $allVMs = Get-Cluster $cluster | Get-VM
 $allDs = Get-Cluster $cluster | Get-Datastore
 
 
 #Set Start Locations of Objects
 $x = 1
 $y = .5
 
 #DRAW ALL Cluster-NODES
 Foreach ($cluster in $allclusters) {
     $y += 0.25
     $clusterInfo = "CLUSTER: " + $cluster.Name
     $clusterObj = add-visioobject $Clusters $clusterInfo
 
 #DRAW ALL Datastore's and connect them to the cluster object
     Foreach ($d in $allDs) {
 
             $x = -3
             $y += 1.5
             $dsInfo = "Datastore: " + $d.Name  + "`nDSCapacity(GB): " + [math]::Round([decimal]$d.CapacityGB,2)
             $datastores = add-visioobject $datastores $dsInfo
             connect-visioobject $clusterObj $datastores
 
     }
 
 #DRAW ALL Physical VMHOST NODES with Node Name, Total Memory and vCenter version and connect them to the cluster object
     Foreach ($node in $allNODES) {
 
             $x = 2
             $y += 1.5
             $nodeInfo = "NODE: " + $node.Name  + "`eSXIVersion: " + $node.Version + "`nTotalMemory(GB): " + [math]::Round([decimal]$node.MemoryTotalGB,2)
             $nodeObj = add-visioobject $VMware_Host $nodeInfo
             connect-visioobject $clusterObj $nodeObj
 
 # GET All Virtual Machines and drwa them based on the OS type and connect them to the Node object.
 $allVMNodes = Get-VMHost $node | Get-VM | select guestfamily,guestostype | Group-Object guestostype |?{$_.name -ne ''} | select name,count
 
         foreach ($vm in $allVMNodes) {
 
             $x += 2
             $y += 1.5
             $vmInfo = "VM_OSType: " + $vm.Name  + "`nNo_of_VM's: " + $vm.count
             $VirtualMachine = add-visioobject $VirtualMachine $vmInfo
             connect-visioobject $nodeObj $VirtualMachine
 
         }
 
         }
 
         }
 
 # Resize the Visio so that all fits in one page, nice and clean.
 $pagObj.ResizeToFitContents()
 
 # Save the Visio file generated in desktop for each of the cluster.
 $DocObj.SaveAs("C:\Users\vinithm\Desktop\vmwarelabvisio\$cluster.vsd")
 
 }