ENVOI (SAUVEGARDE) D'UN FICHIER BINAIRE SUR UN SITE DISTANT (ASP CLASSIQUE)

Signaler
Messages postés
136
Date d'inscription
vendredi 19 novembre 2004
Statut
Membre
Dernière intervention
25 mai 2012
-
Messages postés
30
Date d'inscription
lundi 10 février 2003
Statut
Membre
Dernière intervention
27 juin 2008
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/39160-envoi-sauvegarde-d-un-fichier-binaire-sur-un-site-distant-asp-classique

Messages postés
30
Date d'inscription
lundi 10 février 2003
Statut
Membre
Dernière intervention
27 juin 2008

Bonjour Nicolas,

Oui, ça fonctionne mais... il n'est pas possible de recevoir une base de données par exemple car elle est protégée en lecture directe. Il faut donc que l'émetteur prenne la décision de l'envoyer, d'ou mon code.
Merci quand même pour ton code.
Messages postés
136
Date d'inscription
vendredi 19 novembre 2004
Statut
Membre
Dernière intervention
25 mai 2012

Dans le même style :

enfin me semble t'il...

<!--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library"
-->
<%
Set objXMLHTTP = CreateObject("Microsoft.XMLHTTP")
objXMLHTTP.open "GET", "url du fichier", false

objXMLHTTP.send(null)

Set Stream = server.CreateObject("ADODB.Stream")

Stream.Type = adTypeBinary
Stream.Open

Stream.write objXMLHTTP.responseBody

Stream.SaveToFile "emplacement souhaité avec extension", adSaveCreateOverWrite
%>

En tous cas ca fonctionne au moins avec des fichiers MP3 et JPG pas essayé avec d'autres :p