如何判断一个下载文件是否存在,下载链接是否有效?

Question

<script language=vbscript>
Set myxml = CreateObject("msxml2.XMLHTTP")
myxml.Open "GET", "http://community.csdn.net/Expert/topic/3770/3770659.xml?temp=.6215326", False
myxml.send
MsgBox myxml.getResponseHeader("etag")
if myxml.getResponseHeader("etag")="" then msgbox "文件不存"
</script>

Answer 1

<script language="javascript">
function getURL(url)
{
    var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
    xmlhttp.open("GET",url,false);
    xmlhttp.send();
    if (xmlhttp.readyState==4)
      alert((xmlhttp.Status==200)?"存在":"不存在");
}
//user like this:
getURL("http://localhost/Web_Calendar_30.rar");
</script>