Bonjour
sur la base d'un exemple que j'ai trouver ici j'aimerais adapter le code pour répondre à mon besoin d'automatiser la recherche sur google atravers le navigateur internet explorer
noté bien le test se fait sur internet explorer 8
jusqu'a maintenant j'arrive a lancer internet explorer ecrire le mot à chercher il me rest d'extraire les résultat de recherche et trouver le lien qui contient le nom de domaine que je veux s'il le trouver il doit clicker sur le lien
pouvez vous 'aidez SVP pour résoudre se problème
voici le code que j'execute
je pense que internet explorer 8 no comprend pas la commande
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72 ie est un objet Automation "InternetExplorer.application" tIndustriel est un objet Automation dynamique Boutons est un objet Automation dynamique Resultat est un objet Automation dynamique ResHandle est entier système i,j sont des entiers //oForm est un objet Automation dynamique ie>>visible = True ResHandle = ie>>hwnd sUrl est une chaîne = "https://www.google.com" LIB_SansNom1 = "Chargement de "+sUrl+"........." ie>>navigate(sUrl) TANTQUE ie>>Busy OR ie>>readyState <> 4 Multitâche(100) FIN LIB_SansNom1="Page Chargée.." Multitâche(300) //ie>>document>>hasFocus() tIndustriel = ie>>document>>GetElementsByName("q") tIndustriel>>item(0)>>value = "voyage touristique paris" //Boutons = ie>>document>>getElementsByName("btnG") Boutons = ie>>document>>GetElementsByName("btnG") Boutons>>item(0)>>Click() TANTQUE ie>>Busy OU ie>>readyState <> 4 Multitâche(100) FIN // Identifiez la zone des résultats (vous devrez peut-être ajuster la classe) Resultat = ie>>document>>getElementsByClasse("fuLhoc ZWRArf") // Exemple de classe, ajustez-la selon la structure de la page nomdomaine est une chaine ="domaine.com" // Parcourez les résultats et faites quelque chose avec eux lienHref est une chaîne // Parcourez les 10 p^remier résultats et extrayez les liens POUR i = 0 À 9 // Obtenez l'attribut href de chaque élément lienHref = Resultat>>item(i)>>getAttribute("href") si chaineoccuence(lienhref,nomdoamine,sanscasse)>0 alors // Faites quelque chose avec chaque lien, par exemple, affichez-le dans la console de WinDev Info(lienHref) fin FIN j= ie>>document>>getElementsByName("btnG")>>length //j = Boutons>>Length //POUR i = 0 À j // SI tIndustriel>>item(i)>>Name = "btnG" ALORS // Boutons>>item(i)>>Click() // FIN //FIN sResultat est une chaîne = ie>>document>>body>>innerHTML VersPressePapier(sResultat) RETOUR ie>>quit()
Merci pour votre aide
Partager