如何阻止別人非法鏈接你網(wǎng)站的圖片？

    <% 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)