��ǰλ�ã�首页 > 集团介绍

集团介绍

防止他人恶意引用站内图片的代码

����:ʱ��:2019-04-13
防止他人恶意引用站内图片的代码  <% Option Explicit Dim strBuffer, FilePathstrBuffer = 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)  
���ű�ǩ: