Impossibilité de copier des informations sur un site web

Bonjour à tous,

Je suis en train de créer une macro pour récupérer des informations sur un site en ligne et mettre ces données dans un fichier Excel.

Pour la plupart des sites j'ai réussi mais un me donne du fil à retordre.

Dans cette page j'aimerais récupérer le premier prix (qui est le plus faible) sous la partie descriptive de l'item en question.

Voici mon code :

Sub TestPrix()

Dim request As Object
Dim response As String
Dim html As New htmldocument
Dim website As String
Dim price As Variant<br>

Le string website contient l'URL du site mais je ne peux pas le joindre dans mon message :

image
Set request = CreateObject("MSXML2.XMLHTTP")
request.Open "GET", website, False
request.setRequestHeader "IF-Modified-Since", "Sat 1 Jan 2000 00:00:00 GMT"
request.send
response = StrConv(request.responseBody, vbUnicode)
html.body.innerHTML = response

price = html.getElementsByClassName("f_Strong").Item(0).innerText

MsgBox (price)

End Sub

Le problème est que je n'arrive pas à récupérer toute une partie de la page et je ne sais pas pourquoi.

Merci d'avance pour votre aide ! :)

Tayrok

Bonjour,

Avec cette url on tombe sur la première page d'une série de produits. Si on veut accéder à la deuxième page il est demandé de se connecter. Le problème ne viendrait-il pas de là?

Bonjour,

Pour ma part, il m'est arrivé le même problème à cause d'un trop grand nombre de fichier temporaires sur mon ordinateur. Essaye de les nettoyer et de relancer ta macro pour voir si cela ne vient pas de cela :)

Bonjour fcyspm30,

Normalement même sans se connecter tu as accès aux articles en vente et leur prix. Mais par contre tu n'as pas accès à d'autres services du site. Tu peux essayer avec n'importe quel article, cela marchera de la façon pour tous je suppose. En utilisant le lien directement que j'ai mis (je suis désolé, étant nouveau sur le forum, je ne peux pas le copier-coller), tu tomberas sur un article avec les prix de vente (je me mets en navigation privée car je suis connecté sur le site avec ma navigation normale) :

image

Est-ce que tu me confirmes cela ou tu n'as accès à rien du tout ?

Bonjour Sothin,

Cela n'a pas réglé le problème, j'ai toujours les mêmes difficultés :/

Petite update :

Voilà ce que j'obtiens lors de mes tests :

- J'essaye de récupérer ces infos :

image

Et voilà ce que ma macro me sort avec la class "detail-cont" :

image

Donc tout sauf ce qui m'intéresse (le prix en orange sur le screen)

- Et quand je veux récupérer ces infos :

image

Voilà ce que ma macro sort avec la class "relative-goods" :

image

Donc encore une fois tout sauf ce qui m'intéresse :(

Est-ce que quelqu'un sait pourquoi et comment régler cela ?

Merci d'avance

Bonjour Tayrok et

Une petite présentation ICI serait la bienvenue

Je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER]
qui vous aidera dans vos demandes et réponses sur ce forum et notamment :

  • Ne demandez rien d'illégal ou d'éthiquement discutable (comme par exemple le retrait d'un mot de passe VBA, l'extraction de données d'un site qui ne l'autorise pas, etc).

Avez-vous la possibilité de nous apporter la preuve que c'est autorisé ?

Merci de votre participation

Cordialement

Bonjour BrunoM45,

Si ces infos sont disponibles en ligne sans se connecter ç un compte et par n'importe qui, j'en ai conclu qu'il n'y avait rien d'illégal.

Mais sinon non je ne peux pas en apporter la preuve, comment puis-je faire ça ?

Si mon post ne convient pas au forum, je le retirerais évidemment. Ce post était là plus pour le défi technique qu'il représente que pour de mauvaises intentions

Et je vais faire la présentation de ce pas ;)

Tayrok

Rechercher des sujets similaires à "impossibilite copier informations site web"