begin process at 2008 08 20 16:15:58
1 228 921 membres
286 nouveaux aujourd'hui
14 259 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Recherche Google [ Réseaux & Internet / Internet ] (octopuz)

Recherche Google le 01/06/2008 12:46:57

octopuz
Bonjour,
Je cherche à faire une macro qui lance une recherche sur google et me renvoie le nombre de résultats trouvés.
Mais une fois la requete lancée :
- je ne sais pas comment récupere l'info sur la page web
- et je ne sais pas comment refermer cette page

Quelqu'un suarait il faire ?

Merci pour votre aide

Re : Recherche Google le 02/06/2008 01:36:37

jack
(Admin CS)
Salut
Suffit d'utiliser le composant INET et sa méthode OpenUrl :
   Dim laPage As String
   laPage = Inet1.OpenURL("http://www.google.fr/search?hl=fr&q=octopuz&meta=")

Le lien passé ici est celui d'une recherche du mot "octopuz" : tu remarqueras la syntaxe
Le résultat de la recherche sera stocké dans la variable laPage.

Sur la page, il te faudra rechercher "Résultats 1 - 10 sur un total d'environ 8 240 pour octopuz (0,14 secondes) "
Bien spur, les chiffres et/ou la présentation risque de changer selon la recherche que tu fais : A toi de rechercher la chaine qui apparaitra toujours : "sur un total" je pense.

Suffit de rechercher ce texte dans laPage avec l'instruction Instr et de jouer avec les commandes de manipulation de chaine :
Instr, Mid, Left, Right, Split ...

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)


Classé sous : recherche, google

Participer à cet échange

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

Téléchargements

Boutique

Boutique de goodies CodeS-SourceS