Discussion :

[Tikate]

Bonjour à tous,

J'utilise le code suivant pour récupérer une image sur un serveur distant:

Code :

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

1
2
3
4
5
6
7
 
Response.ContentType = "image/jpeg"
Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
objHTTP.open "GET", "http://www.test.com/getblob.asp?i=4411",false
objHTTP.send
Response.BinaryWrite objHTTP.ResponseBody
Set objHTTP = Nothing

L'image s'affiche bien, maintenant je voudrais la sauvergarder sur le serveur, qulq saurait il comment faire?

merci par avance.
Tikate.

[Tikate]

C bon j'ai trouvé
Après le code que j'ai tapé plus haut ajouter :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Set adoStream = Server.CreateObject("ADODB.Stream")
adoStream.Type = 1   ' binary
adoStream.Open
adoStream.Write objHTTP.ResponseBody      ' on intercepte les données émises
adoStream.SaveToFile Server.mapPath("../produits/scaled/"&isbn&".jpg"), 2   ' on sauve le fichier "mettre le chemin qui vous convient"
Response.Write(fichier & " correctement reçu !")
 
 
Set objHTTP = Nothing
adoStream.Close
Response.Flush
Set adoStream = Nothing

[Tikate]

J'ajoute aussi pour les débutants qu'il ne faut surtout pas qu'il y ai autre chose que le code cité dans votre page asp. Le fait de changer le contenttype dans la première ligne ne le permet pas, je pense ne pas pas me tromper là dessus, les modérateurs me corrigeront dans le cas échéant...