[R] Valider une DialogBox

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
maclapi
Niveau 1
Niveau 1
Messages : 4
Enregistré le : ven. 06 juin 2008 09:09
Status : Hors ligne

[R] Valider une DialogBox

#1

Message par maclapi »

Bonjour,
Lors de l'enregistrement d'un fichier à telecharger une double dialogbox s'ouvre
le tritre des deux dialogbox est identique "Téléchargement de fichier"
Image

le code que j'essaie de mettre en place

Code : Tout sélectionner

#include <IE.au3>
$url = "http://idfmain.orange.com:8080/NSP/"
$o_object =_IECreate($url)
$s_linkText = "Download the Windows 32-bit JRE installer"
_IELinkClickByText($o_object,$s_linkText)
; Change into the WinTitleMatchMode that supports classnames and handles
AutoItSetOption("WinTitleMatchMode", 4)
$i_instance = 2
$handle = WinGetHandle("Téléchargement de fichier", "endommager")
 _IEAttach("Téléchargement de fichier", "DialogBox",$i_instance)
_IEImgClick($o_object,"Enregistrer")
Si quelqu'un à une idée pour avancer elle sera la bienvenue.
cdlt
ml
bilou972
Niveau 2
Niveau 2
Messages : 16
Enregistré le : mer. 30 avr. 2008 16:31
Status : Hors ligne

Re: [..] valider dialogbox

#2

Message par bilou972 »

Bonjour,
la fenêtre au premier plan est certainement un contrôle. Donc tu peux clicker sur le bouton enregistrer en faisant ControlClick.
Pour vérifier ça, utilise AutoIt Window Info. En bas, tu as un onglet control, c'est le deuxième onglet. Tu obtiendras plus d'informations sur le bouton que tu veux clicker.

En espérant que ça t'aide.
Avatar du membre
Yoyo86220
Niveau 6
Niveau 6
Messages : 238
Enregistré le : mer. 12 mars 2008 21:47
Status : Hors ligne

Re: [..] Valider une DialogBox

#3

Message par Yoyo86220 »

Oulalalala je sais pas si ceci va te faire plaisir mais je trouve que tu te crote bien le chou pour rien...
ce script télécharge firefox

Code : Tout sélectionner

$GUI = GUICreate("Ma GUI Download", 300, 400, -1, -1)

$Telecharger = GUICtrlCreateButton("Télécharger" , 161, 125, 80 , 25) ; bouton
$progressbar1 = GUICtrlCreateProgress (30 , 188 , 200 , 20) ; processbar
GUICtrlSetColor (- 1 , 32250) ;thème Windows

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $Telecharger
            Global $Url = "http://download.mozilla.org/?product=firefox-3.0rc2&os=win&lang=fr";ici le lien du logiciel à dl
            InetGet( $Url , @DesktopDir&"/FireFox.exe", 1, 1);il sera dl sur le bureau
            $FileSize = InetGetSize ( $Url ) ; ceci calcul la taille de ton fichier qui se trouve sur internet
            While @InetGetActive
                $i = TrayTip("Téléchargement",  Int ( ( @InetGetBytesRead * 100 ) / $FileSize )&" %", 10, 16)
                GUICtrlSetData ( $progressbar1 , Int ( ( @InetGetBytesRead * 100 ) / $FileSize ) )
                Sleep(50)
            Wend
            Sleep(1000)
            GUICtrlSetData ( $progressbar1 , 0 )
    EndSwitch
WEnd
Répondre