rEAD PROGRESSBAR IN sPYBOT

[llewxam]

As part of an auto installer for Spybot I would like to be able to read the immunization progressbar and use it to time when scanning current immunizations is done, and when applying new immunizations is done. I hate using their silent or update switches, it seems harder to time Spybot by which processes are running and have quit than to just apply a 45-second timer to scanning and applying immunizations and just forcing quiting as I do currently. I'd be happy to share my current (fully functional) code for Spybot if requested.

For now though, I have been trying to use ControlCommand to get the status of the progressbar, the only options I can get to give me a good result are IsVisible and IsEnabled, so this is most likely not the right command, and help would be great. Current (almost worthless) code I have for this is:

$test=ControlCommand ( "Spybot - Search & Destroy", "", "[id:2360984]", "IsVisible" ,"")
msgbox(0,"test",$test)

Once I got it to give a result on the status of immunization that looked worth a darn I was going to switch to a TrayTip so I could see the progress go, as proof it was working properly, then from there I can better time my auto installer.

Thanks for any help!

Ian

[Melba23]

llewxam,

From what I can find out there is no function or UDF that can read the value from an external app's progress bar. However, I do have the following suggestions which you might find useful (the first is a bit tongue-in-cheek, but I have seen sillier things! ):

1. Use ControlGetPos on the progress bar and then use PixelGetColor to work out where the colour change is.

2. If any of the controls in the app change as the progress bar reaches the end (Start/Stop button, Status bar, even the progress bar itself since you mention that IsEnabled gives you a return) you could at least use a marquee style progress bar until that happens to show that something is going on.

#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <SendMessage.au3>

$hGUI = GUICreate("Test", 500, 500)
GUICtrlCreateProgress(10, 10, 400, 20, $PBS_MARQUEE)
_SendMessage(GUICtrlGetHandle(-1), $PBM_SETMARQUEE, True, 50) ; final parameter is update time in ms
GUISetState()

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Sorry I cannot be of more help.

M23

[llewxam]

llewxam,

From what I can find out there is no function or UDF that can read the value from an external app's progress bar. However, I do have the following suggestions which you might find useful (the first is a bit tongue-in-cheek, but I have seen sillier things! ):

1. Use ControlGetPos on the progress bar and then use PixelGetColor to work out where the colour change is.

2. If any of the controls in the app change as the progress bar reaches the end (Start/Stop button, Status bar, even the progress bar itself since you mention that IsEnabled gives you a return) you could at least use a marquee style progress bar until that happens to show that something is going on.

#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <SendMessage.au3>

$hGUI = GUICreate("Test", 500, 500)
GUICtrlCreateProgress(10, 10, 400, 20, $PBS_MARQUEE)
_SendMessage(GUICtrlGetHandle(-1), $PBM_SETMARQUEE, True, 50) ; final parameter is update time in ms
GUISetState()

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Sorry I cannot be of more help.

M23

No, as always you were helpful, thanks. I was kinda thinking about suggestion 1, but just assumed something more "elegant" could be done.....

Thanks again

Ian

[storme]

Hi Ian

I've been working on a spybot "handler" for a while now.

I'm at the stage I've got it handling all popups that occur during install, initial run, update (one popup to go I think).

I'm aiming for a script that will handle everything without human intervention (download, install, update, run, uninstall).

Anyway the solution I found to check for end of imunisation or UNDO was to close the spybot window. Spybot doesn't allow it to be closed untill the process is complete.

;Close window when imunization is complete
    WinClose("Spybot - Search & Destroy", "")
    While WinExists("Spybot - Search & Destroy", "")
        Sleep(1000)
    WEnd

Not elegent but works.

I wouldn't mind seeing your code to see if it covers everything I need. It may save me a lot of time.

Thanks

John Morrison

AKA

Storm-E

[Bert]

Both the installer and main exe have command line support. You won't need to track the install.

Here is the list:

Here is a list of command line parameters that the Spybot-S&D installer supports:

/sp-

Will skip the first page of the installation wizard (Do you wish to continue? ...)

/silent

Will display the progress during installation, but not the wizard.

/verysilent

Even the progress will not be shown. Errors etc. would still be shown.

/surpressmsgboxes

Will use standard actions for message boxes (no overwriting of files, cancelling where the alternative would be retrying...)

/log (or /log="filename")

Creates a log file in the temp folder that contains detailed information about actions taking place during the installation.

/nocancel

Disables the Cancel and Close button. Useful with /silent.

/norestart

Suppress reboots even if they were necessary at the end of the installation.

/restartexitcode=N

If a restart is needed, the setup would return the specified exit code.

/loadinf="filename" (and /saveinf="filename")

Can be used to use a saved setup configuration (or save one).

/lang=language

Overrides the language dialog with a predefined language. Use ISO 2 letter language describers here.

/dir="x:\dirname"

Installs into that directory instead of the default one.

/group="folder name"

Installs into a program group of that name instead of the default one.

/noicons

Avoids creation of any icons for the installed software.

/type=typename

Starts installation with a give type. Supported types are

full,

blind and

compact.

/components="comma separated list of component names"

Installs the given components instead of the default ones. Supported components are

main,

blind (icons for blind users),

language (all language files),

skins,

updatedl (for downloading updates as part of the installation),

updatew95 (to download prerequisites on Windows 95),

SDWinSec (to install the Security Center integration on Vista),

SDShredder (to install the stand-alone shredder), and

SDDelFile (to install the file removal helper).

/tasks="comma separated list of tasks"

Specifies a list of tasks that should be executed. Tasks currently supported are:

desktopicon

quicklaunchicon

launchsdhelper

launchteatimer

/mergetasks="comma separated list of tasks"

Same as /tasks, just with the exception that standard tasks are not disabled by default.

[llewxam]

@Volly:

Only speaking for myself here, but as I said in the first post I hate using their commandline switches with my installer because it handles more than Spybot, and figuring out when it is finished based on which processes have started/are running/have quit was more trouble than it was worth..... On it's own I'm sure it is helpful to some, but not me

@storme

Long time no see/hear/type/whatever I haven't touched that other project of ours in a while, I had to make some changes to the main app and haven't gone back to fix everything up yet.....

Anyway, what I do currently for SB is:

expandcollapse popup

$timedelay=250
            Run(@tempdir&"\TechFaves\Spyware Removal\spybotsd162.exe")
            winwait("Select Setup Language","Cancel")
            WinActivate("Select Setup Language","Cancel")
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Welcome to the Spybot - Search & Destroy Setup")
            WinActivate("Setup - Spybot - Search & Destroy","Welcome to the Spybot - Search & Destroy Setup")
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Please read the following important information")
            WinActivate("Setup - Spybot - Search & Destroy","Please read the following important information")
            sleep($timedelay)
            send("!a")
            sleep($timedelay)
            send("{ENTER}")
            DirRemove(@ProgramFilesDir&"\Spybot - Search & Destroy")
            winwait("Setup - Spybot - Search & Destroy","To continue, click Next. If you would like to select")
            WinActivate("Setup - Spybot - Search & Destroy","To continue, click Next. If you would like to select")
            sleep($timedelay)
            send("{ENTER}")
            sleep(500)
            if WinExists("Folder Exists") then send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Select the components you want to install")
            WinActivate("Setup - Spybot - Search & Destroy","Select the components you want to install")
            sleep($timedelay)
            send("{TAB}")
            sleep($timedelay)
            send("{DOWN 5}")
            sleep($timedelay)
            send("{SPACE}")         
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","To continue, click Next. If you would like to select")
            WinActivate("Setup - Spybot - Search & Destroy","To continue, click Next. If you would like to select")
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Select the additional tasks you would like Setup")
            WinActivate("Setup - Spybot - Search & Destroy","Select the additional tasks you would like Setup")
            sleep($timedelay)
            send("{DOWN}")
            sleep($timedelay)
            send("{SPACE}")
            sleep($timedelay)
            send("{DOWN 2}")
            sleep($timedelay)
            send("{SPACE}")
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Click Install to continue with the installation, or click")
            WinActivate("Setup - Spybot - Search & Destroy","Click Install to continue with the installation, or click")
            sleep($timedelay)
            send("{ENTER}")
            winwait("Setup - Spybot - Search & Destroy","Setup has finished installing Spybot - Search")
            WinActivate("Setup - Spybot - Search & Destroy","Setup has finished installing Spybot - Search")
            sleep($timedelay)
            send("{SPACE}")
            sleep($timedelay)
            send("{ENTER}") ;regular install done
            
            run(@ProgramFilesDir&"\Spybot - Search & Destroy\SDUpdate.exe")
            winwait("Spybot-S&D Updater","Display beta updates")
            WinActivate("Spybot-S&D Updater","Display beta updates")
            sleep($timedelay)
            send("!s")
            sleep(2000)
            sleep($timedelay)
            send("!c")
            sleep(2000)
            sleep($timedelay)
            send("!d")
            winwait("Legal stuff")
            WinActivate("Legal stuff")
            sleep($timedelay)
            send("{TAB}")
            sleep($timedelay)
            send("{SPACE}")
            sleep($timedelay)
            send("{ENTER}")
            winclose("Spybot-S&D Updater")
            winwait("Spybot-S&D Wizard")
            WinActivate("Spybot-S&D Wizard")
            winclose("Spybot-S&D Wizard");end update
            sleep(1000)
            if winexists("Confirm","Ignore") then
                winactivate("Confirm","Ignore")
twice)")
                sleep($timedelay)
                send("{TAB 2}")
                sleep($timedelay)
                send("{ENTER}")
            endif
            winactivate("Spybot - Search & Destroy")
            sleep(1000)
            sleep($timedelay)
            send("!i")
            $sbmessage="Allowing 45 seconds for Spybot to detect current immunizations."&@cr&"45 seconds remaining"
            SplashTextOn("Please Wait",$sbmessage,500,75)
            for $sb=44 to 1 step -1
                ControlSetText("Please Wait","","Static1",$sbmessage)
                sleep(1000)
                $sbmessage="Allowing 45 seconds for Spybot to detect current immunizations."&@cr&$sb&" seconds remaining"
            next
            sleep($timedelay)
            send("!i")
            winactivate("Spybot - Search & Destroy")
            $sbmessage="Allowing 45 seconds for Spybot to apply new immunizations."&@cr&"45 seconds remaining"
            for $sb=44 to 1 step -1
                ControlSetText("Please Wait","","Static1",$sbmessage)
                sleep(1000)
                $sbmessage="Allowing 45 seconds for Spybot to apply new immunizations."&@cr&$sb&" seconds remaining"
            next
            SplashOff()
            ProcessClose("spybotsd.exe")

Hopefully that helps.

Ian

[llewxam]

Just as an FYI for those interested, the following works to detect the presence of the progressbar and the dimensions:

$bar=ControlCommand ( "Spybot - Search & Destroy", "", "[class:TProgressBar]", "IsEnabled" ,"")
if $bar=1 Then
    $test=ControlGetPos("Spybot - Search & Destroy", "", "[class:TProgressBar]")
    msgbox(0,"h",$test[0]&"  "&$test[1]&"  "&$test[2]&"  "&$test[3]&"  ")
endif

So once again thanks M23! The rest should be cake.

Ian