[R] StringRegExp simple qui ne fonctionne pas

[jguinch]

Ah les humeurs de IE

On est bien d'accord

J'ai également remarqué que le lancement d'IE avec un _IECreate échouait souvent quand on le "lance trop" vite derrière une fermeture.
Je n'ai jamais pris le temps de chercher pourquoi...

Peut-être avec une bidouille du genre, ça pourrait faire un pansement :

Code : Tout sélectionner

Local $oIE
While NOT IsObj($oIE)
    $oIE = _IECreate("http://www.pagespro.com/resultats/transport-et-mise-en-oeuvre-du-beton")
    Sleep(1000)
WEnd

Edit : grillé par mikell

[mikell]

Ah jguinch, le charme rassurant des anciennes configs tu as oublié ce que c'est

Il n'est pas interdit de soupçonner que le IE version 11 soit devenu une telle usine à gaz que le processus prend un certain temps à se fermer, pendant lequel l'objet InternetExplorer.Application persiste
_IEQuit($oIE) = $oIE.quit() + $oIE = 0 (dixit l'include)
Ce n'est qu'une hypothèse, mes compétences en paranormal n'étant que ce qu'elles sont c'est-à-dire succintes

[jguinch]

Le temps de fermeture peut éventuellement venir de l'option "Supprimer l’historique de navigation en quittant le navigateur"

Pour décocher la case avant le lancement d'IE:

Code : Tout sélectionner

RegWrite("HKCU\Software\Microsoft\Internet Explorer\Privacy", "ClearBrowsingHistoryOnExit", "REG_DWORD", 0)

[orax]

Ah les humeurs de IE

On est bien d'accord

En même temps, cetipabo semble avoir un ordi moisi. Entre le probleme d'installation du pack AutoIt FR et IE qui déconne…

J'ai également remarqué que le lancement d'IE avec un _IECreate échouait souvent quand on le "lance trop" vite derrière une fermeture.
Je n'ai jamais pris le temps de chercher pourquoi...

Je ne sais pas si ça a un rapport mais, avec Firefox, c'est un peu pareil ; si je le rouvre trop vite après avoir fermé la dernière fenêtre, j'ai un message m'indiquant qu'il n'est pas fermé. Pourtant je n'ai plus de fenêtre ouverte (en fait, le processus est encore ouvert).

[jguinch]

@orax : oui, Firefox peut être super long à la fermeture, il lui faut des fois plusieurs secondes...
Apparemment, c'est l'historique qui est la cause. Le fichier places.sqlite peut monter en taille et du coup faire un peu traîner lamentablement l'engin...
Un peu de ménage de temps en temps dans l'historique devrait aider...

[Utilisateur 3309 supprimé]

En même temps, cetipabo semble avoir un ordi moisi. Entre le probleme d'installation du pack AutoIt FR et IE qui déconne…

Un core I7 avec SSD...il doit y avoir bien plus moisi que moi sur le forum
pour le probleme d'installation le problème est résolu, c'etait just un emulateur d'applications Android (BlueStacks) qui provoque une incompatibilité lors de l'instalaltion de Scite4Autoit.

Sinon pour le problème en cours sur ce topic, personne ne m'a dit s'il avait le même problème que moi...suis-je le seul pour qui le script marche de facon aléatoire ? chez vous, vous cliquez 10x dessus et ca marche a chaque fois ?

[orax]

personne ne m'a dit s'il avait le même problème que moi...suis-je le seul pour qui le script marche de facon aléatoire ? chez vous, vous cliquez 10x dessus et ca marche a chaque fois ?

Tu dois être le seul à avoir des problèmes. C'est d'ailleurs pour ça que j'ai pensé que ton ordi est moisi. Décidément, la Force n'est pas avec toi, jeune Padawan.

Et en exécutant ça, t'as la même erreur ? Il faut l'exécuter dans SciTE puisque ça affiche pas mal de trucs dans la console.

► Afficher le texte

Code : Tout sélectionner

#include <MsgBoxConstants.au3>
#include <IE.au3>
#include <debug.au3>


Enum $READYSTATE_UNINITIALIZED, _   ; 0
     $READYSTATE_LOADING,  _        ; 1
     $READYSTATE_LOADED,  _         ; 2
     $READYSTATE_INTERACTIVE,  _    ; 3
     $READYSTATE_COMPLETE _         ; 4

_DebugSetup(Default, True, 2)
_DebugCOMError(1)

For $i = 1 To 10
    _DebugOut(">Itération : " & $i)

    _DebugOut("_IECreate()...")
    Local $oIE = _IECreate("http://www.pagespro.com/resultats/transport-et-mise-en-oeuvre-du-beton", 0, 1, False)
    If @error Then MsgBox($MB_ICONERROR, Default, StringFormat("%s\r\n@error : %s\r\n@extended : %s", @ScriptLineNumber, @error, @extended))
    _DebugReportVar("$oIE", $oIE, True)
    While 1
        _DebugReportVar("$oIE.ReadyState", $oIE.ReadyState, True)
        _DebugReportVar("$oIE.Busy", $oIE.Busy, True)

        If Not $oIE.Busy And $oIE.ReadyState >= $READYSTATE_LOADED Then
            _DebugReportVar("$oIE.document.ReadyState", $oIE.document.ReadyState, True)

            ; Quand document.ReadyState = "interactive", le document est parsé donc à ce stade,
            ; il est maintenant possible de récupérer des éléments.
            If $oIE.document.ReadyState = "interactive" Or $oIE.document.ReadyState = "complete" Then ExitLoop
        EndIf

        Sleep(2000)
    WEnd

    $oSpans = _IETagNameGetCollection($oIE, "span")
    If @error Then MsgBox($MB_ICONERROR, Default, StringFormat("%s\r\n@error : %s\r\n@extended : %s", @ScriptLineNumber, @error, @extended))
    _DebugOut("-->Nombre d'éléments SPAN retournés : " & @extended)
    _DebugReportVar("$oSpans", $oSpans, True)

    Local $txt
    For $oSpan in $oSpans
        If $oSpan.getattribute("itemprop") = "name" Then $txt &= $oSpan.innertext & @crlf
    Next

    _DebugReportVar("$oIE", $oIE, True)
    _IEQuit($oIE)
    If @error Then MsgBox($MB_ICONERROR, Default, StringFormat("%s\r\n@error : %s\r\n@extended : %s", @ScriptLineNumber, @error, @extended))
    _DebugReportVar("$oIE", $oIE, True)
Next
 

Le titre débute par un [R] donc on pourrait penser que le sujet est résolu.