Hente indhold fra GIF fil

Du kan bruge ADODB.Stram som kan læse en fil binært.

<%
  'Create a stream object
  Dim objStream
  Set objStream = Server.CreateObject("ADODB.Stream")
 
  'Open a GIF file
  objStream.Type = adTypeBinary
  objStream.Open
  objStream.LoadFromFile Server.MapPath("/enfoler/enfil.gif")
 
  'Output the contents of the stream object
  Response.ContentType = "image/gif"

'Udskriv evt filen med .BinaryWrite sådan her:
'  Response.BinaryWrite objStream.Read
 
  str = objStream.Read
  'Clean up....
  objStream.Close
  Set objStream = Nothing
%>