Télécharger fichier html et exécution automatique du script

Bonjour à tous et à toutes,

J’aimerais de l’aide pour créer un script vbs qui permet de copier un fichier html à partir d’un serveur web:

http://10.126.52.150:8080/g/PDM/PDM2-16:11:2009.html

De l’enregistrer sous U:\Document\Serveurs\Suivi\Rapport_sauvegardes.xls
Et que ce script s’exécute une fois par jour le matin à 09h00 part exemple.

Le problème c’est que le fichier html change de nom tous les jours avec la date du jour, et n’est accessible que via le serveur http.

Ex : http://10.126.52.150:8080/g/PDM/PDM2-16:11:2009.html -> 16/11/2009
Ex : http://10.126.52.150:8080/g/PDM/PDM2-15:11:2009.html -> 15/11/2009

Merci pour votre aide et/ou vos conseils.

Bonjour,

Un début de piste.

Ce script se connecte à l'adresse construite avec la date du jour.
La variable "Contenu" représente la source de la page.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

Set IE = CreateObject("InternetExplorer.Application") IE.Visible = False IE.Silent = True   ' Formatage de la date Jour = Day(Now) Mois = Month(Now) Annee = Year(Now) DateJour = Jour & ":" & Mois & ":" & Annee URL = "http://10.126.52.150:8080/g/PDM/PDM2-" & DateJour & ".html"   IE.Navigate URL   Do Until IE.ReadyState = READYSTATE_COMPLETE DoEvents Loop 'attend la fin du chargement Contenu = IE.Document.DocumentElement.innerHTML   msgbox Contenu   IE.Quit Set IE = Nothing

---

PS : Pas testé