Discussion :

[lafron]

Voici mon problème :

Nous supposons une adresse URL dans laquelle se situent des photos qui m’intéressent. Par exemple http://www.exemple.fr/visuels

Le site ne donne accès aux images que seulement si on connait le nom de l’image. Si j’essaye de l’aspirer en totalité, http://www.exemple.fr/visuels l’accès m'est refusé. Idem via ftp, il y a un mot de passe.

En revanche si je tape http://www.exemple.fr/visuels/monimage1.jpg, je peux l'afficher et surtout l'enregistrer dans mon ordinateur. Mais j'ai plus de 20000 images et une à une, c'est fastidieux...

J’ai une base ACCESS dans laquelle j'ai la liste de tous les noms des images à récupérer. Et je voudrais donc lancer "un code VB" qui récupère en boucle chaque image dont j’ai besoin et qui l’enregistre sur mon disque local au format jpg ou gif.

Une ame charitable pourrait-elle m'aider ?
Merci par avance et bonne soirée

Jluc

[loufab]

Bonjour,

L'aspiration de site c'est comme la drogue ; c'est mal si c'est le site d'un autre.

La solution consiste à créer une boucle sur la table qui contient le nom du fichier.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Dim rst as recordset
set rst = currentdb.openrecordset("MaSource",dbopensnapshoot)
while not rst.eof
' ici appel de ta procédure de récupération ou tu lui passe le nom
' par exemple
RecupereMonImage rst.fields("NomImage")
rst.movenext
wend
rst.close
set rst = nothing

Masource et le nom d'une table ou d'une requête contenant la colonne qui stocke les noms de fichier.
MonImage et le nom de cette colonne.
RecupereMonImage est la procédure que tu as créé pour copier le fichier ou tu lui passe le nom de l'image.

Cordialement