Demande d'aide sur un site web.

Nombre de messages : 1596 Date d'inscription : 19/01/2014

Bonjour.

Peut-être que Klaus pourrait m'aider sur le moteur de recherche français-allemand !

Comment faire pour déclencher l'affichage, avec kgf.dll, de tous les résultats de la page web suivante ?

http://dict.leo.org/frde/index_fr.html#/search=manger&searchLoc=0&resultOrder=expert&multiwordShowSingle=on

Merci d'avance.

C'est simple:

Code:: dim res%, dll$, WB%, url$, version%
dll$ = "KGF.dll"
full_space 0

dll_on dll$

version% = 1 : ' gestion multi-browser
' version% = 2 : ' sans gestion multiu-browser

select version%
case 1 : ' =========== version 1 (ma préférence) avec gestion multi-browser
' ouvrir ouvrir un browser
WB% = dll_call1("WB_Create",handle(0))

' posisitionner le browser
res% = dll_call5("WB_Locate",WB%,10,10,1000,700)

' contruire l'URL de la page souhaitée
url$ = "http://dict.leo.org/frde/index_fr.html#/search=manger&searchLoc=0&resultOrder=expert&multiwordShowSingle=on"

' charger la page souhaitée
res% = dll_call2("WB_Url",WB%,adr(url$))

case 2 : ' =========== version 2 sans gestion multi-browser
' ouvrir ouvrir un browser
WB% = dll_call1("WB_Create",handle(0))

' posisitionner le browser
res% = dll_call5("WB_Locate",WB%,10,10,1000,700)

' contruire l'URL de la page souhaitée
url$ = "http://dict.leo.org/frde/index_fr.html#/search=manger&searchLoc=0&resultOrder=expert&multiwordShowSingle=on"

' charger la page souhaitée
res% = dll_call2("WB_Url",WB%,adr(url$))

end_select

end

Nombre de messages : 1596 Date d'inscription : 19/01/2014

Bonjour.

@Klaus.

Je viens de tester ton code avec le mot 'manger'.
Mais le résultat obtenu ne correspond pas à ce que je recherche exactement.

J'obtiens toujours le pavé "Afficher plus de verbes (15/42)", dans la liste des verbes, ce qui ne me permet pas d'obtenir l'ensemble des traductions, par programmation.

Mon but est de récupérer toutes les traductions d'un mot quelconque.

A mon avis, il doit y avoir une part de javascript dans la page !

Normal. C'est le cas également avec le lien que tu as donné dans ton post initial.

Essaie ceci:
1. utilise WB_Function code 8 pour récupérer le handle du browser
2. utilise une des fonctions du groupe "Envoi de touches, caractères et textes à un objet" pour envoyer ctrl/F suivi de "Afficher plus de verbes" (sans les guillemets").
3. Puis envoie un clic gauche...

En fait,, c'est ce qu'il faudrait faire manuellement...

» besoin daide pour code
» Site de traduction.
» Changement de site WEB
» Mon site web.
» Bug du site