Grazie ho trovato lo script ma come faccio a farlo funzionare nella mia pagina? Ti prego puoi guardare la pagina che ho inviato e vedere se riesci a capire?

codice:
<!-- 
METADATA TYPE="typelib" 
UUID="00000205-0000-0010-8000-00AA006D2EA4" 
NAME="ADODB Type Library" 
--> 
<% 
' METADATA SERVE PER IMPORTARE LE COSTANTI DI ADO2.5 

Dim objStream 
Set objStream = Server.CreateObject("ADODB.Stream") 

objStream.Type = adTypeBinary 
objStream.Open 
objStream.LoadFromFile Server.MapPath("images/" & 
request.QueryString("file")) 

'Al browser 
Response.ContentType = "application/jpeg" 
Response.BinaryWrite objStream.Read 

objStream.Close 
Set objStream = Nothing 

%>