<% Server.ScriptTimeout = 10000 Response.ContentType = "image/jpeg" q=Request("q") Set objHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP") objHTTP.open "GET",q,false objHTTP.send Response.BinaryWrite objHTTP.ResponseBody Set objHTTP = Nothing %>