[R] winexists * X

[yohan8]

Bonjour,

J'aimerais que autoit me compte le nombre de fenêtre d'internet explorer. A noter qu'ils n'ont pas le même titre.
Mon but est de créer un système anti-bug que dés qu'il y aura trop de fenêtres internet et les fermes tous, sauf une.


Yohan

[TopXm]

Hello

Code : Tout sélectionner

$_Arr = ProcessList("iexplore.exe")

For $A = 1 To $_Arr[0][0] -1
    ProcessClose($_Arr[$A][1])
Next

[TT22]

Tu peux essayer ça :

► Afficher le texte

Code : Tout sélectionner

Const $MAX = 5;Maximum de fenêtres...

While 1
    $WinList = WinList()
    $IEWinOpened = 0
    For $i = 1 To UBound($WinList)-1 Step 1
        If StringInStr($WinList[$i][0],"Internet Explorer") Then
            $IEWinOpened+=1
        EndIf
        If $IEWinOpened = $MAX Then
            For $i = 1 To UBound($WinList)-1 Step 1
                If StringInStr($WinList[$i][0],"Internet Explorer") Then
                    ProcessClose(WinGetProcess($WinList[$i][0]))
                    $IEWinOpened-=1
                EndIf
                If $IEWinOpened = 1 Then
                    ExitLoop
                EndIf
                ExitLoop
            Next
        EndIf
    Next
WEnd

Chez moi il ne fonctionne pas parceque les fenêtres Internet Explorer n'ont pas de titre
Mais essaye chez toi

[yohan8]

Bonjour,

Ton script ne fonctionne pas. Prenons juste la partie qui compte le nombre de fenêtre :

Code : Tout sélectionner

While 1
    MsgBox(0,'','boucle')
    $WinList = WinList()
    $IEWinOpened = 0
    For $i = 1 To UBound($WinList)[color=#FF0000]-1 Step 1[/color]
        If StringInStr($WinList[$i][color=#FF0000][0][/color],"Windows Internet Explorer") Then
            $IEWinOpened+=1
            MsgBox(0,'',$IEWinOpened)
        EndIf
    Next
WEnd

J'ai intégré des msgbox pour 'suivre la boucle'. Résultat, lorsqu'on lance la script sans fenêtre internet ouverte la boucle fonctionne [Cool c'est déjà sa ]
Mais lorsque j'ouvre une fenêtre internet, le Msgbox m'indique que $IEWinOpened prend la valeur 1 puis sans refaire la boucle, prend la valeur 2 . Puis la boucle recommence et j'obtiens le même résultat.

J'ai mis en rouge les éléments que je ne comprend pas.

Vu que tu ne peux pas essayer le script chez toi, je fait appelle au autre

[mikell]

Mais si, ça marche, essaie ça

Code : Tout sélectionner

While 1
    $list = ""
    $WinList = WinList()
    $IEWinOpened = 0
    For $i = 1 To $WinList[0][0]-1
        If StringInStr($WinList[$i][0],"Internet Explorer") Then
            $IEWinOpened+=1
        $list &= $WinList[$i][0] & @crlf
        EndIf
    Next
    MsgBox(0,'',$IEWinOpened & @crlf & $list)
WEnd

[yohan8]

D'accord, Autoit me détect 2 fenêtre ouvertes alors qu'il y en a qu'une.
Aucun problème j'ai qu'a doubler les effectifs

[mikell]

C'est pas Autoit ....
Si mon script (tu l'as essayé au moins ?) ne te renvoie pas le nombre de fenêtres exact avec leur titre, c'est que ton IE ou ta machine déconnent

[yohan8]

Tout est parfais car le script me renvoie le nom de mes fenêtre mais ils les doublent.
Vu que tout le monde est fan d'Autoit, on vas dire que c'est ma machine qui déconne

[mikell]

C'est un problème connu (cause malware ou options IE)
http://help.com/post/101629-when-i-open ... orer-two-w
http://www.justskins.com/forums/unwante ... 96577.html