| 标题 | 如何阻止别人非法链接你网站的图片? |
| 范文 | <% Option Explicit Dim strBuffer, FilePath strBuffer = Request.ServerVariables("HTTP_REFERER") strBuffer = mid(strBuffer, InStr(strBuffer,".") + 1) strBuffer = left(strBuffer, InStr(strBuffer, "/") - 1) FilePath = "/HIDDENIMAGES/" If strBuffer = "intels.net" then FilePath = FilePath + Request.QueryString("FName") Else FilePath = "/images/chunfeng.jpg" End If Response.Redirect(FilePath) |
| 随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。