Powershell script to get firewall status on all computers on the domain

Question

Trying to create a script that will get the status of the firewall's on all computers in the domain. I have a decent start but the formatting looks like crap and I am sure there is a better way to do this. Any help would be appreciated.
$strFilter = "computer"
$objDomain = New-Object System.DirectoryServices.DirectoryEntry
$objSearcher = New-Object System.DirectoryServices.DirectorySearcher
$objSearcher.SearchRoot = $objDomain
$objSearcher.SearchScope = "Subtree"
$objSearcher.PageSize = 1000
$objSearcher.Filter = "(objectCategory=$strFilter)"
$colResults = $objSearcher.FindAll()
foreach ($i in $colResults)
$objComputer = $i.GetDirectoryEntry()
$objComputer.Name
netsh -r $objComputer.Name advfirewall show allprofiles state | Export-Csv -append -Path C:\Firewall.csv
My export is not working as expected - it is just giving me gibberish numbers

Answer 1

Using the above script I was able to get the netsh output to txt.  However the formatting is not very good.  Not sure if there is anything that can be done about that.  Unfortunately though the output does not even display the computer
name so that the output is just a bunch of the following...
Domain Profile Settings:
State                                 OFF
Private Profile Settings:
State                                 OFF
Public Profile Settings:
State                                 OFF
Ok.
Domain Profile Settings:
State                                 OFF
Private Profile Settings:
State                                 OFF
Public Profile Settings:
State                                 OFF
Ok.
How do I at least get the computer name in the text file?
I added $objComputer.Name to the loop this and it didn't work...  it did not put this in the text file.
Thanks for your help 
$strFilter = "computer"
$objDomain = New-Object System.DirectoryServices.DirectoryEntry
$objSearcher = New-Object System.DirectoryServices.DirectorySearcher
$objSearcher.SearchRoot = $objDomain
$objSearcher.SearchScope = "Subtree"
$objSearcher.PageSize = 1000
$searcher=[adsisearcher]'(objectCategory=computer)'
$searcher.FindAll() |
ForEach-Object{
$objComputer.Name
netsh -r $_.Properties['name'][0] advfirewall show allprofiles state
} |
Out-File -append -FilePath C:\Firewall.txt