Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Récuperer une page HTML

Récuperer une page HTML

9 réponses
Avatar
Eric
Bonjour,

Quelqu'un connait-il une procédure qui permet de récupérer le contenu d'une
page HTML sur un site à partir de l'URL, par exemple :
http://www.allocine.fr/film/fichefilm_gen_cfilm=51115.html.

Le but est d'extraire des informations et de les mettre dans des champs de
table

Merci d'avance

--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pierre CFI [mvp]
decidement, que des questions idiotes :o)
je sais pas, regarde sur excelabo.net, il me semblait avoir vu du code pour récupérer des infos et les mettre dans des cellules
cellules ou champs, il doit pas y avoir un truc insurmontable à faire
sinon raymond, mais pas avant demain, là il cuve tranquillos...:o))

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Eric" a écrit dans le message de news:
Bonjour,

Quelqu'un connait-il une procédure qui permet de récupérer le contenu d'une
page HTML sur un site à partir de l'URL, par exemple :
http://www.allocine.fr/film/fichefilm_gen_cfilmQ115.html.

Le but est d'extraire des informations et de les mettre dans des champs de
table

Merci d'avance

--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/


Avatar
Pierre CFI [mvp]
.../...
sur excel xp et +, on peut faire des req sur le web, donc donc...

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Pierre CFI [mvp]" a écrit dans le message de news:
decidement, que des questions idiotes :o)
je sais pas, regarde sur excelabo.net, il me semblait avoir vu du code pour récupérer des infos et les mettre dans des cellules
cellules ou champs, il doit pas y avoir un truc insurmontable à faire
sinon raymond, mais pas avant demain, là il cuve tranquillos...:o))

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Eric" a écrit dans le message de news:
Bonjour,

Quelqu'un connait-il une procédure qui permet de récupérer le contenu d'une
page HTML sur un site à partir de l'URL, par exemple :
http://www.allocine.fr/film/fichefilm_gen_cfilmQ115.html.

Le but est d'extraire des informations et de les mettre dans des champs de
table

Merci d'avance

--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/






Avatar
Eric
"Pierre CFI" écrivait

decidement, que des questions idiotes :o)


Argh, c'est pas mon jour ... <soupir> <soupir>
Merci, toutefois, de ta réponse rapide

;-)

je sais pas, regarde sur excelabo.net, il me semblait avoir vu du code
pour récupérer des infos et les mettre dans des cellules cellules ou
champs, il doit pas y avoir un truc insurmontable à faire


Oui, j'ai vu un post pour récupérer dans une feuille Excel le contenu
d'une page Web sur MPFE. La procédure affiche tout le code dans une feuille
créée à cet effet, elle retourne suivant le cas 1500 lignes ou +. Mais
n'étant pas un spécialiste de la programmation sous Excel, je me suis dit
que ce genre de chôse a pu être déjà fait sous Access.

A défaut, je l'utiliserai.
Je vais aller voir du coté d'Excelabo.

sinon
raymond, mais pas avant demain, là il cuve tranquillos...:o))



Oh, là, j'oserai pas abuser de sa tranquilité. 2 maux de tête en même
temps, ca va pas faire l'affaire ! :o))

--
A+
Eric

Lien à suivre : http://users.skynet.be/mpfa/

Avatar
Eric
"Pierre CFI [mvp]" écrivait
news::

.../...
sur excel xp et +, on peut faire des req sur le web, donc donc...



Hélas, je tourne sous Office 2k Pro
Merci pour l'info
--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

Avatar
Gloubi
Bonjour

As tu essayé le code de http://users.skynet.be/accesshome/net.htm#ReadInURL

Penser à coller en plus de cette fonction toutes les API (plus haut dans la page) et variables
qui sont utilisées par la fonction.
a+"Eric" a écrit dans le message de news:

| "Pierre CFI" écrivait
|
| > decidement, que des questions idiotes :o)
|
| Argh, c'est pas mon jour ... <soupir> <soupir>
| Merci, toutefois, de ta réponse rapide
|
| ;-)
|
| > je sais pas, regarde sur excelabo.net, il me semblait avoir vu du code
| > pour récupérer des infos et les mettre dans des cellules cellules ou
| > champs, il doit pas y avoir un truc insurmontable à faire
|
| Oui, j'ai vu un post pour récupérer dans une feuille Excel le contenu
| d'une page Web sur MPFE. La procédure affiche tout le code dans une feuille
| créée à cet effet, elle retourne suivant le cas 1500 lignes ou +. Mais
| n'étant pas un spécialiste de la programmation sous Excel, je me suis dit
| que ce genre de chôse a pu être déjà fait sous Access.
|
| A défaut, je l'utiliserai.
| Je vais aller voir du coté d'Excelabo.
|
| > sinon
| > raymond, mais pas avant demain, là il cuve tranquillos...:o))
| >
|
| Oh, là, j'oserai pas abuser de sa tranquilité. 2 maux de tête en même
| temps, ca va pas faire l'affaire ! :o))
|
| --
| A+
| Eric
|
| Lien à suivre : http://users.skynet.be/mpfa/
Avatar
Eric
Bonjour,

"Gloubi" écrivait

As tu essayé le code de
http://users.skynet.be/accesshome/net.htm#ReadInURL

Penser à coller en plus de cette fonction toutes les API (plus haut
dans la page) et variables qui sont utilisées par la fonction.
a+


Merci de ta réponse et de ton lien mais hélas quelque soit la taille du
buffer, je ne récupère en clair que les 16 000 premiers octets. Au-delà ce
ne sont que des espaces ou caratères assimilés.

--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

Avatar
Gloubi
Bonjour,

ah dommage pour les limitations du buffer....

As tu essayé le code plus haut :
http://users.skynet.be/accesshome/net.htm#HttpDownload

avec la syntaxe :
Call Download("http://domaine/chemin/tapage.htm","F:Mes documentstapage.txt")

Si ça marche sur une page html au lieu d'un fichier ( ce qui me semble probable),
tout le code html est dans le fichier local qu'il suffit de lire avec les fonctions habituelles
(Line input)

a+
Gloubi


"Eric" a écrit dans le message de news:

| Bonjour,
|
| "Gloubi" écrivait
|
| > As tu essayé le code de
| > http://users.skynet.be/accesshome/net.htm#ReadInURL
| >
| > Penser à coller en plus de cette fonction toutes les API (plus haut
| > dans la page) et variables qui sont utilisées par la fonction.
| > a+
|
| Merci de ta réponse et de ton lien mais hélas quelque soit la taille du
| buffer, je ne récupère en clair que les 16 000 premiers octets. Au-delà ce
| ne sont que des espaces ou caratères assimilés.
|
| --
| A+
| Eric
| Lien à suivre : http://users.skynet.be/mpfa/
Avatar
Eric
re Gloubi,

Merci bien.
Avec cette fonction plus de problème, je récupère bien toutes les infos.
J'avais attaqué avec une procédure sous Excel mais bon, je préfère tout
faire sous Access.
Me reste plus qu'à traiter le fichier (!!!) et ca ne sera pas une mince
affaire pour virer tout ce qui est inutile, soit 80% des infos ;-)

(A moins que tu ne connaisses un moyen de ne pendre que certaines parties
d'une page)

Merci encore
--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/
Avatar
Gloubi
Bonjour,

"Eric"
|
| (A moins que tu ne connaisses un moyen de ne pendre que certaines parties
| d'une page)
|

ça dépend si tu peux identifier deux chaines de caractères qui délimiteraient le début et la fin
de la partie à conserver .
Dès que la chaine de début est rencontrée, on envoit true à une fonction "statique" qu'on
reteste après chaque ligne, jusqu'à ce que false (chaine de fin rencontrée)
lui soit envoyé.

du genre :

Option Compare Database
Option Explicit

Public Function fImportOK(Optional Param As Variant) As Boolean
Static blnImport As Boolean
If IsMissing(Param) Then
fImportOK = blnImport
Else
blnImport = Param
fImportOK = Param
End If
End Function

Sub ImportTXT()
Dim txtLine As String
Dim LeFichier As String
Dim F As Integer
LeFichier = "c:cheminfichier.txt"
F = FreeFile
Open LeFichier For Input As #F
Line Input #F, txtLine
Do While Not EOF(F)
Line Input #F, txtLine
if InStr(1, txtLine, "chaine debut") > 0 then:call fImportOK(True)
if InStr(1, txtLine, "chaine fin") > 0 then:call fImportOK(False)
If fImportOK() = true then
'ici ta routine de traitement de partie de fichier
end if
Loop
Close #F
End Sub

a+
Gloubi