判断远程图片是否存在[ASP代码]

function CheckURL(byval A_strUrl)
set XMLHTTP = Server.CreateObject('Microsoft.XMLHTTP')
XMLHTTP.open 'HEAD',A_strUrl,false
XMLHTTP.send()
CheckURL=(XMLHTTP.status=200)
set XMLHTTP = nothing
end function
Dim imgurl
imgurl='UploadFiles/2007829144940734.gif'
if CheckURL(imgurl) then
response.write '图片存在'
else
response.write '图片不存在'
end if

判断远程图片是否存在[js代码]

{
var oReq = new ActiveXObject('Microsoft.XMLHTTP')
oReq.open('Get','UploadFiles/2007829144941621.gif',false);
oReq.send();
//alert(oReq.status)
if(oReq.status==404)
alert('不存在');
else
alert('存在')
}