Get list of files and directories of current logged on user on each machine from scan.list

scan.ps1

function get-loggedonusers
{
    param([Array]$Computer)
    $computers = get-wmiobject Win32_Computersystem -computername $Computer
    $report = @()
    foreach ($c in $computers) {
        $temp = "" | Select Computer, Username
        $temp.Computer = $c.name
        $temp.Username = $c.username
        $report += $temp
    }
    $report
}

$computers = Get-Content "scan.list"

foreach ($comp in $computers) {
    if (Test-Connection -Cn $comp -BufferSize 16 -Count 1 -ea 0 -quiet) {
	Write-Host "[+] $comp"
        $lu = (get-loggedonusers $comp).Username

        $objUser = New-Object System.Security.Principal.NTAccount($lu)
        $strSID = $objUser.Translate([System.Security.Principal.SecurityIdentifier])
        $SID = $strSID.Value

        $reg = [Microsoft.Win32.RegistryKey]::OpenRemoteBaseKey('LocalMachine', $comp)
        $regkey = $reg.OpenSubKey("SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\ProfileList\\$SID")
        $ProfileImagePath = $regkey.GetValue("ProfileImagePath")

        $drive, $path = $ProfileImagePath.split(':')

        Get-ChildItem -Path "\\$comp\$drive$\$path" -Recurse | Out-File -filepath "$comp.dir" -encoding OEM
    } else {
	Write-Host "[-] $comp"
    }
}