Başka siteden dosya çekmek

merhaba
şimdi kendi uğraşlarım ile bir aspbot yapmaya calısıyorum ama şimdi takıldıgım bir konu var..
verileri çekiyorum iyi hoş db ye de kayıt ediyorum.. gel gör ki ben bu örneğin orada resim var resimi nasıl cekicegim onu anlıyamadım daha dogrusu internette herhangi bir bilgi bulamadım forumlardada arama yaptım.. yardımcı olursanız sevinirim şimdiden tşkrler..

<%
cnsURL = "http://www.resimsakla.com/data/media/8/Bebek_.jpg"

Set XmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
XmlHttp.Open "GET", cnsURL, False
XmlHttp.send
Resim = XmlHttp.ResponseBody 'Resim dosya kodları
Set XmlHttp = Nothing

Set BinaryStream = Server.CreateObject("ADODB.Stream")
BinaryStream.Type = 1 'Binarydata içi 1
BinaryStream.Open
BinaryStream.Write Resim

ResimFTPADI = "bebek.jpg" 'resmi kaydetmek için bir adı olmalı

BinaryStream.SaveToFile Server.MapPath("resimklasor/" & ResimFTPADI & ""), 2 '< varsa üstüne yazmak için 2
Set BinaryStream = Nothing

Response.Write("İşlem Tamam")
%>