Conversion Autoit à Vb.net

Version imprimable

Bonjour je cherche à convertir ce code autoit en vb :

Code:

1
2
3
4
5
6
7
8
9
10
11
Global $page = _IECreate("http://mosite.fr")
 
 
$oElements = _IETagNameAllGetCollection ($page)
_IELoadWait($page)
Sleep(2000)
For $oElement In $oElements
    if String($oElement.innerText) = "MonElement" Then _
    _IEAction($oElement, "Click")
Next
Sleep(2000)

En gros cliquer sur un élément Javascript

Voilà c'est tout , merci

Si tu pouvais nous détailler ce qu'est sensé faire ton code AutoIt ce serait déjà un bon début ... :roll:

Sinon à la volée :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
        WebBrowser1.Navigate("www.mosite.fr")
 
    End Sub
 
 
    Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
 
 
        For Each h As HtmlElement In WebBrowser1.Document.GetElementsByTagName("MonElement")
            h.InvokeMember("Click")
        Next
 
    End Sub

WebBrowser1 est un control WebBrowser permettant l'affichage de page internet.

19/08/2013, 17h48
Skylle

J'ai une erreur :

"Une exception de première chance de type 'System.NullReferenceException' s'est produite dans WindowsApplication1.exe"

Et comme je l'ai dit mon code sert a cliquer sur un élément javascript
19/08/2013, 18h23
_Ez3kiel

Si c'est "juste" clicker sur un élément javascript : TonElementHtml.InvokeMember("Click") 'ou OnClickSinon pour l'exception je pense que c'est parce que tu n'as pas rajouté de WebBrowser dans ton interface ...
19/08/2013, 19h25
Skylle

Bon je vais vous donnez un exemple simple voilà , si je veux cliquer sur " changer de pays " sur un script starpass , comment je dois faire ?
19/08/2013, 21h01
_Ez3kiel

Tu regardes la source à l'endroit où il y a le lien.

WebBrowser1.Document.GetElementsByTagName("span") te retourne les span de la page, tu trouves le bon et tu invoke Click. Idem pour les <a>, les <input type="submit"> etc, j'ai mis <span> comme exemple.

Ou tu cherches par l'ID s'il en a un avec WebBrowser1.Document.GetElementById("BttnChangePays")Ces méthodes te retournent un HtmlElement, et sur ce dernier tu peux faire .InvokeMember("Click")
Tu as toutes les clefs en main à toi de trouver.
19/08/2013, 21h30
Skylle

Cela n'a rien à voir avec l'ID et avec les balises , le code autoit comme je l'ai mis fonctionne parfaitement , mais si je n'arrive pas à adapter un vb c'est qu'il yque ce n'est pas si facile que ça
19/08/2013, 21h51
_Ez3kiel

Si, ça à tout à voir.

Pour pointer sur un lien spécifique d'une page, tu dois savoir soit son tag (a), soit son id(<a id="test">), soit son innertext <a href="#">InnerText</a>, soit encore d'autres particularités pour pointer ce lien et pas un autre.

Sinon comment veux tu que la machine sache quel lien cliquer ?

Ton code autoit charge une page, récupère une collection de tous les éléments de cette page, et fais un Click sur l'élément qui a pour innertext "MonElement". (Je suppose je fais pas d'autoit) et c'est relativement le code que je t'ai proposé. Maintenant si tu n'as jamais fait de VB.NET, copier/coller un script sans savoir comment il fonctionne, c'est sûr qu'à la moindre lettre ou besoin qui change tu sauras plus quoi faire.
19/08/2013, 23h59
Skylle

En effet je débute le vb mais j'ai essayé de retouché des dizaines de script de ton genre et ça a toujours pas marché .
Je désespère un peu mais bon , j'espère que je trouverais
20/08/2013, 10h10
_Ez3kiel

Fouille un peu dans ce que propose le Webbrowser, tu as pleins de méthodes et properties qui te seront utiles pour arriver à tes fins, lis des tutos, fais-toi des prototypes, familiarise-toi avec le Vb.NET etc ... ;)
21/08/2013, 00h34
Skylle

Quelqu'un aurait une autre solution , j'ai vraiment tout essayé là ...