[VBscript] Récupération de fichier internet
Résolu
malhsi
Messages postés
5
Statut
Membre
-
furious -
furious -
Bonjour,
J'ai récupéré un script (vbscript) qui permet d'enregistrer en local et automatiquement un fichier à partir d'internet.
Trouvé ici : https://www.generation-nt.com/reponses/telecharger-un-fichier-a-partir-d-une-adresse-http-entraide-137853.html
Le script :
Je l'utilise dans un fichier .hta. En cliquant sur "Bouton", le fichier se télécharge sans problème.
Par contre, si je modifie le fichier fichier.txt sur le serveur et reclique sur "Bouton", le fichier téléchargé n'est pas modifié. Il reste identique à celui téléchargé la première fois.
Si je comprends bien (mais je suis assez limité à ce niveau), le flux de données reste dans le cache du navigateur.
J'ai essayé en bloquant le cache dans les balises META : pas mieux.
Si vous savez ce qu'il faut que je modifie dans le script ou si vous avez d'autres solutions, je suis preneur.
Merci.
J'ai récupéré un script (vbscript) qui permet d'enregistrer en local et automatiquement un fichier à partir d'internet.
Trouvé ici : https://www.generation-nt.com/reponses/telecharger-un-fichier-a-partir-d-une-adresse-http-entraide-137853.html
Le script :
<script type="text/vbscript"> Function Objet_XMLHTTP On Error Resume Next Set Objet_XMLHTTP=CreateObject("Microsoft.XMLHTTP") Set Objet_XMLHTTP=CreateObject("MSXML2.XMLHTTP") On Error GoTo 0 End Function Sub Importer_Fichier_Du_Web(source,destination) Set HTTP=Objet_XMLHTTP With HTTP .Open "GET",source,False .Send End With With CreateObject("ADODB.Stream") .Type=1 .Open .Write HTTP.ResponseBody .SaveToFile destination,2 .Close End With Set HTTP=nothing End Sub Sub Bouton_onClick Importer_Fichier_Du_Web "http://url/fichier.txt","fichierlocal.txt" End Sub </script> <span id="Bouton" name="Bouton">Bouton</span>
Je l'utilise dans un fichier .hta. En cliquant sur "Bouton", le fichier se télécharge sans problème.
Par contre, si je modifie le fichier fichier.txt sur le serveur et reclique sur "Bouton", le fichier téléchargé n'est pas modifié. Il reste identique à celui téléchargé la première fois.
Si je comprends bien (mais je suis assez limité à ce niveau), le flux de données reste dans le cache du navigateur.
J'ai essayé en bloquant le cache dans les balises META : pas mieux.
Si vous savez ce qu'il faut que je modifie dans le script ou si vous avez d'autres solutions, je suis preneur.
Merci.
A voir également:
- [VBscript] Récupération de fichier internet
- Fichier bin - Guide
- Fichier epub - Guide
- Fichier rar - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier .dat - Guide