Création d'une image à partir de son code binaire

Version imprimable

10/05/2006, 12h10
thefaycal

Création d'une image à partir de son code binaire

Salut tout le monde,
bref, je dois créer une image en partant de son code binaire, la sauvegarder en png et l'afficher dans une page dans une page asp.
pour le moment j'ai pas trouvé comment le faire
en attendant, je dépanne avec ça:

Response.ContentType = "image/png"
Response.AddHeader "Content-Disposition","filename=image.png"
Response.BinaryWrite(flux)

en asp.net/c# par exemple, grosso modo je fais un truc comme suivant:

MemoryStream ms= new MemoryStream(flux);
Bitmap bm = new Bitmap(ms);
string Path = "c:\\test.Png";
bm.Save(Path, ImageFormat.Png);

Avez vous une idée comment traduire ça en VBscript ?
merci d'avance
10/05/2006, 13h49
thefaycal

Entre temps, j'ai trouvé une astuce pas mal pour resoudre mon problème:
mettre le Response.BinaryWrite() dans un fichier image.asp puis dans la page ou je veux afficher mon image:
<html>
<img src="image.asp" />
</html>

Le problème, c'est que je peux tjr pas sauvegarder physiquement par programmation le résultat du Response.BinaryWrite() :(
10/05/2006, 15h18
Immobilis

Salut,
Et comment tu récupères ton image?
A+
11/05/2006, 18h51
thefaycal

merci
c'est pas vraiment là le problème mais le code binaire je le recupere via un web service...
ça peut aussi etre un champ BLOB d'une base de données...
bref, d'ou vient le code binaire, c'est pas important !
mon prob, c'est que une fois initialiser une variable avec mon code, comment sauvegarder par programmion le résultat physiquement...
autrement dis, comment remplacer le
Response.BinaryWrite()
par qlq chose comme
Response.SaveBinaryTo("test.png")
13/05/2006, 00h32
Immobilis

Salut,

As-tu essayé de voir comment fonctionne les pages ASP de téléchargement sans composant. Cela peut peut-être t'inspirer.
http://www.google.fr/search?hl=fr&q=...component&meta=
http://www.google.fr/search?hl=fr&q=...echercher&meta=
A+
17/05/2006, 12h09
thefaycal
meme si je trouve des exemples, il s'agit jamais d'une image ou de n'importe quel autre fichier bianire mais seulement d'un fichier text...
et dans ce cas, un code comme le suivant
Code:

1 2 3 4 Set FileObject = Server.CreateObject("Scripting.FileSystemObject") Set Out=FileObject.CreateTextFile("c:\test.png", True) Out.Write MonCodeBinaire
ne donne rien du tout

Edité par immobilis pour les balises de code.
17/05/2006, 16h07
Fablondon

Regarde ce lien, c'est peut etre une solution ...
http://support.microsoft.com/default...b;en-us;193998
18/05/2006, 11h28
thefaycal

merci les gars mais je pense que la solution n'existe tout simplement pas...
votre article s'intitule : How To Read and Display Binary Data in ASP
moi je cherche pas a "Display" mais plutot a sauvegarder physiquement les données binaires
peut etre il faut faire recours a un composant DLL externe bricolé avec visaul basic... mais je pense pas que je pourrai le faire vu que je suis depuis un sacré temps mouillé dans .NET
merci tout de meme
18/05/2006, 11h39
Fablondon

Je suis tombé sur ca, peut etre que ca peut t interesser
http://www.codeproject.com/asp/vbsupload.asp
18/05/2006, 13h04
thefaycal

effectivement c'est un peu pres ce que je cherche... mais pas de chance je n'arrive pas a telecharger le code source du site [code project]... j'ai tjr un: An error has occurred :cry:

ouffff, aussi tot le fichier téléchargé, aussi tot la solution trouvée
Code:

1 2 3 4 5 6 7 8 codeBinaire = MyFunctionThatReturnBinaryData() Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFSOFile = objFSO.CreateTextFile("d:\test.png") For lngLoop = 1 to LenB(codeBinaire) objFSOFile.Write Chr(AscB(MidB(codeBinaire, lngLoop, 1))) Next objFSOFile.Close
les fonctions MidB et AscB sont obligatoires; je ne sais pas ce qu'elles font au juste mais elles figurent meme pas dans ma référence du VBscript
ok ok !
merci tout le monde

18/05/2006, 17h39
Fablondon

Je crois que ASP ne traite pas le binaire pur, jepense que ces fonctions le traduise en code ASCIIpour etre utilisable en asp...
Je crois...