Ben basitçe şu şekilde hallettim, daha sağlıklı bi önerisi olan olursa yazarsa sevinirim.

<%
Dim resim
Dim resasp
Dim tip, tip2

resim=Request("res")
tip = right(resim, 3)

if tip = "jpg" then
tip2 = "jpeg"
elseif tip = "gif" then
tip2 = "gif"
elseif tip = "png" then
tip2 = "png"
end if

Set resasp = server.createobject("ADODB.Stream")
resasp.Type = 1
resasp.Open
resasp.LoadFromFile server.MapPath(resim)
Response.ContentType = "image/"& tip2
Response.BinaryWrite resasp.Read()
resasp.Close
Set resasp = Nothing
%>

[biolight]

yukarıda yazdıklarından anladığım kadarı ile sitenin Bandwidth azaltmak istiyorsun.

eğer öyle ise yukarı ki ASP kodlara bir de
HTTP_HOST kontrolu koymalısın
senin host değilse 404.gif gösterirsin,senin host ise normal image gözükür.

ayrıyeten yukarıdaki kodlara gerek kalmadan
.htaccess dosyası ilede bişiler yapılabiliniyor sanırım.

esasında bu soruyu forumun Sunucu Tabanlı Prog. (server Side)
bölümünde sorsan daha sağlıklı ve net cevaplar alabilirsin.