set x = server.createobject("msxml2.xmlhttp")
x.open "get","http://www.baidu.com/img/baidu_logo.gif",false
x.send
if isnull(x.responsetext) then
response.write "no picture!"
else
if (not isempty(x.responsetext)) and lcase(left(x.responsetext,3))="gif" then
response.write "yes,picture!"
else
response.write "no picture!"
end if
end if