Page 1 sur 1

[R] Selection une checkbox d'une page web

Posté : mar. 28 juil. 2009 15:52
par baconix
Bonjour,

Je travaille actuellement sur un script qui réalise plusieurs actions sur internet, grâce au forum j'ai pu commencé à réaliser des actions comme connecter sur un site.
Merci pour les 2 topics
http://www.autoitscript.fr/forum/viewto ... n+page+web
http://www.autoitscript.fr/forum/viewto ... web#p14750

Enfin venons à mon problème actuel, je suis sur une page avec une checkbox et je souhaite donc cliquer sur un des différents choix de la box. Je réalise les actions suivantes pour trouver la box et sélectionner mon choix.

Code : Tout sélectionner

Func SelectListFist()
    if not @error Then
        If StringInStr(_IEDocReadHTML($IEPage), "Vos combinaisons favorites...") =0 Then ; vérifie qu'on n'est pas déja sur la page
            _IENavigate($IEPage,$AdressToSelect)
        EndIf
        $List = _IEFormGetCollection($IEPage, 0)
        $Favoris=_IEFormElementGetObjByName ($List ,"favoris" )
        _IEFormElementCheckBoxSelect ($Favoris,"4",1, "byIndex" )
        ;_IELinkClickByIndex ( $Favoris, 4)
 
J'otient une erreur de type _IEFormElementCheckboxSelect, $_IEStatus_InvalidObjectType alors que j'ai bien selectionné logiquement ma box.Ci-dessous un bout du code source de la page

Code : Tout sélectionner

<input type="checkbox" value="1" name="favoris" id="favoris" disabled="disabled" /><label for="favoris">Enregistrer dans vos favoris</label><br />
            <select name="liste_favoris" onchange="selectFavoriteGrid(this)" style="display:block;">
                <option selected="selected" value="">***************</option>
                <option value="************">************</option><option value="*************">***************</option><option value="****************">*************-
Je suis ouvert à toutes aides et liens pouvant m'aider merci

Re: [R] Selection une checkbox d'une page web

Posté : mer. 29 juil. 2009 12:27
par baconix
Erreur stupide de ma part, j'ai confondu une checkbox avec une liste dépliante. Voila cela fonctionne.

Code : Tout sélectionner

Func SelectListFist()
    if not @error Then
        If StringInStr(_IEDocReadHTML($IEPage), "Vos combinaisons favorites...") =0 Then ; vérifie qu'on est pas déja sur la page 
            _IENavigate($IEPage,$AdressToSelect)
        EndIf
        $Lists = _IEFormGetCollection($IEPage,0)
        $Favoris=_IEFormElementGetObjByName ($Lists ,"liste_favoris" )  
        _IEFormElementOptionSelect ( $Favoris,"1",1,"byIndex")

Ps: _IE_Example () pour s'entrainer est parfait