这个是很久以前写的,高效率,极其简洁。看到众多网上发布的,十分复杂、几百行的盗链百度图片程序,即累赘、又复杂、还超级不好用,真是神经病写的,所以发布出来这个。

Baidu.asp:

<%
On Error Resume Next
Url = Request.QueryString '获取URL
IF len(Url)<>0 and InStr(lcase(Url), "http://") <> 0 and InStr(lcase(Url), "baidu.com/") <> 0 Then '判断地址是否正确
    Set xml = Server.CreateObject("Microsoft.xmlhttp")
    xml.Open "GET",Url,False
    xml.Send
    Response.ContentType = "image/jpeg"
    Response.BinaryWrite xml.ResponseBody
    Set xml=Nothing
Else
    Response.Write "Error!"
End IF
%>

用法:File.asp?md5=1f58f20c5156a930b0b2b3ccf952415b

留言评论(旧系统):

piaoyu @ 2011-08-08 09:34:09

不错,不愧是大牛

本站回复:

piaoyu @ 2011-08-08 09:40:16

刚刚测试一下,貌似防盗链的都可以秒杀。

本站回复:

额,那些防盗链的都是判断来路,这个直接不发送来路,所以就可以突破了。