ASPのヒント：リモート画像が存在するかどうかを判断します

関数checkurl（byval a_strurl）

xmlhttp = server.createObject（microsoft.xmlhttp）を設定します

xmlhttp.open head、a_strurl、false

xmlhttp.send（）

checkurl =（xmlhttp.status = 200）

xmlhttp = Nothingを設定します

エンド関数

Dim Imgurl

imgurl = uploadfiles/2007829144940734.gif

Checkurl（imgurl）の場合

Response.Write画像が存在します

それ以外

Response.Write画像は存在しません

ifを終了します

リモート画像が存在するかどうかを判断します[JSコード]

{

var oreq = new ActiveXObject（microsoft.xmlhttp）

oreq.open（get、uploadfiles/2007829144941621.gif、false）;

oreq.send（）;

//alert(oreq.status）

if（oreq.status == 404）

アラート（「存在しない」）;

それ以外

アラート（存在する）

}