<%
' 创建一个 XMLHTTP 对象
Set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP")

' 要检查的远程文件 URL
strURL = "http://pay.zuoju.net/file.txt"

' 设置同步请求的选项，调用 Open 方法并发出请求
objXMLHTTP.open "HEAD", strURL, false
objXMLHTTP.send ""

' 检查 HTTP 响应状态
If objXMLHTTP.Status = 200 Then
Response.Write("文件存在。")
Else
Response.Write("文件不存在。")
End If

' 清理：关闭对象并释放内存
objXMLHTTP.Close
Set objXMLHTTP = Nothing
%>