ASP 網路上下載遠端圖檔

URL = "http://www.yahoo.com.tw/"& strGUID & ".jpg"
Set objXMLHTTP = CreateObject("Microsoft.XMLHTTP")
objXMLHTTP.Open "GET", URL, false
objXMLHTTP.Send

Set objStream = CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 1
Pic = objXMLHTTP.responseBody

Set objStream = Nothing
Blob2File mypage,"C:\taiwan.gif"
Set objXMLHTTP = Nothing