How can I enum the systems on a domain that have Chrome browser installed?

[BrewManNH]

Try this version, I realized I screwed up some of the variable names and their locations in the FileExists function.

expandcollapse popup

#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GUIListBox.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <Misc.au3>
#include <File.au3>
Global $TargetFolder, $TargetItem, $FileList, $aItems, $sItems, $FileListItem, $ProgNum
_Main()
;ProgressOn("File Seeker","")
;ProgressSet(0, "", 0 & " %")
$TargetFolder = "C$Users"
If @error = 1 Then Exit
For $OuterLoop = 1 To $aItems[0]
    $FileList = _FileListToArray("" & $aItems[$OuterLoop] & "" & $TargetFolder & "", "*", 2)
    If $FileList = 0 Then
        MsgBox(0, "No Folders Found", "Path Not Found.")
        Exit
    EndIf
    For $InnerLoop = 1 To $FileList[0]
        If FileExists("" & $aItems[$OuterLoop] & "" & $TargetFolder & "" & $FileList[$InnerLoop] & "AppDataLocalGoogleChromeApplicationchrome.exe") Then
            MsgBox(0, $TargetFolder & "" & $TargetItem & "AppDataLocalGoogleChromeApplication", "A file named  chrome.exe resides here.")
        EndIf
    Next
    $ProgNum = Round($sItems / $aItems[0] * 100)
    ProgressSet($ProgNum, "", $ProgNum & " %")
Next

Func _Main()
    Local $hListBox, $FinishButton, $CancelButton
    ; Create GUI
    GUICreate("Select Computers", 210, 568)
    $FinishButton = GUICtrlCreateButton("Finish", 4, 541, 120)
    $CancelButton = GUICtrlCreateButton("Cancel", 126, 541, 80)
    $hListBox = GUICtrlCreateList("", 0, 0, 210, 545, BitOR($WS_BORDER, $WS_VSCROLL, $LBS_EXTENDEDSEL))
    GUISetState()
    ; Add strings
    _GUICtrlListBox_BeginUpdate($hListBox)

    ; add CUOPAC computers
    _GUICtrlListBox_AddString($hListBox, "CUONESTOP1")
    _GUICtrlListBox_AddString($hListBox, "CUONESTOP2")
    _GUICtrlListBox_AddString($hListBox, "CUONESTOP3")
    For $i = 1 To 5
        _GUICtrlListBox_AddString($hListBox, "CUOPAC" & $i)
    Next
    _GUICtrlListBox_EndUpdate($hListBox)

    ; Select items
    While 1
        Switch GUIGetMsg()
            Case $CancelButton
                Exit
            Case $FinishButton
                ExitLoop
            Case $GUI_EVENT_CLOSE
                Exit
        EndSwitch
    WEnd

    ; Get text of selected items
    $aItems = _GUICtrlListBox_GetSelItemsText($hListBox)
    GUIDelete()
    ;_ArrayDisplay($aItems)
EndFunc   ;==>_Main

Edited November 15, 2012 by BrewManNH

[aleph01]

Thanks, BrewManNH, that got me past that sticking point to the next, which was that a non-Chrome computer wouldn't create an array with _FileListToArray and I was getting a "subscript used with a non-array variable" error later in the script. However, I worked that out and got my progress bar working. Now the script works just like I want it to across the entire domain. As it turns out, I only needed the script to work on Windows 7 systems, but it would only take an @OSVersion line to determine the $TargerFolder variable to be "C$Users" or "C$Documents and Settings" to get the script to be usable with XP.

For any interested, here is the working version:

expandcollapse popup

#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GUIListBox.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <Misc.au3>
#include <File.au3>
_Singleton("chromeSeek1.0.au3", 0)
_Singleton("chromeSeek1.0.exe", 0)
Global $FileList, $aItems, $sItems, $FileListItem, $ProgNum
$TargetFolder = "C$Users"
;$TargetFolder = "C$Documents and Settings"
_Main()
ProgressOn ("Progress", "", "", "", "", 16)
;ProgressSet(0, "", 0 & " %")
If @error = 1 Then Exit
For $OuterLoop = 1 To $aItems[0]
    $FileList = _FileListToArray("" & $aItems[$OuterLoop] & $TargetFolder, "*", 2)
    If $FileList <> 0 Then
      For $InnerLoop = 1 To $FileList[0]
        If FileExists("" & $aItems[$OuterLoop] & $TargetFolder & $FileList[$InnerLoop] & "AppDataLocalGoogleChromeApplicationchrome.exe") Then
            MsgBox(0, $aItems[$OuterLoop] & $TargetFolder & $FileList[$InnerLoop] & "AppDataLocalGoogleChromeApplication", "A file named  chrome.exe  resides here.")
        EndIf
   Next
;    ElseIf $FileList = 0 Then
;         MsgBox(0, $aItems[$OuterLoop], "Path Not Found.")
 EndIf
$ProgNum = Round($OuterLoop / $aItems[0] * 100)
ProgressSet($ProgNum, "", $ProgNum & " %")   
Next

Func _Main()
    Local $hListBox, $FinishButton, $CancelButton
    ; Create GUI
    GUICreate("Select Computers", 210, 568)
    $FinishButton = GUICtrlCreateButton("Finish", 4, 541, 120)
    $CancelButton = GUICtrlCreateButton("Cancel", 126, 541, 80)
    $hListBox = GUICtrlCreateList("", 0, 0, 210, 545, BitOR($WS_BORDER, $WS_VSCROLL, $LBS_EXTENDEDSEL))
    GUISetState()
    ; Add strings
    _GUICtrlListBox_BeginUpdate($hListBox)
    ; add CUOPAC computers
    _GUICtrlListBox_AddString($hListBox, "ittech1")
    _GUICtrlListBox_AddString($hListBox, "admat")
    _GUICtrlListBox_AddString($hListBox, "CUONESTOP3")
    For $i = 1 To 5
        _GUICtrlListBox_AddString($hListBox, "CUOPAC" & $i)
    Next
    _GUICtrlListBox_EndUpdate($hListBox)
    ; Select items
    While 1
        Switch GUIGetMsg()
            Case $CancelButton
                Exit
            Case $FinishButton
                ExitLoop
            Case $GUI_EVENT_CLOSE
                Exit
        EndSwitch
    WEnd
    ; Get text of selected items
    $aItems = _GUICtrlListBox_GetSelItemsText($hListBox)
    GUIDelete()
    ;_ArrayDisplay($aItems)
EndFunc   ;==>_Main

Again, thanks a million, BrewMan. Without your help, this script would have ended up permanently in my "Scripts in Progress" folder.