一段ASP的HTTP_REFERER判断代码
来源：asp之家 发布时间：2011-03-25 10:41:00
只要不是HTTP_REFERER来源于（google.com google.cn *.google.com *.google.cn baidu.com *.baidu.com）这些网址来源的请求，就通通转发至404
代码如下:
<％
Dim a, reg
a = Request.ServerVariables("HTTP_REFERER").Item
Set reg = New RegExp
reg.Pattern = "^http://(?:[^.]*\.)?(?:google\.com|google\.cn|baidu\.com)(/|$)"
reg.IgnoreCase = True
If Not reg.Test(a) Then
Set reg = Nothing
Response.Status = "404 File Not Found."
Response.End
End If
Set reg = Nothing
' .... 继续
％>
代码如下:
<％@LANGUAGE="VBSCRIPT" CODEPAGE="65001"％>
<％Dim OK_URL,URL,HTTP_REFERER
'自定义需要过滤的字串,用 "|" 分隔
OK_URL= "google.com|google.cn|baidu.com"'排除信息
OK_URL= split(OK_URL,"|") '分割排除信息
URL="404.htm" '设定指向页面
HTTP_REFERER=Request.ServerVariables("HTTP_REFERER")'获取来源网址
If HTTP_REFERER<>"" Then
For Each REFERER In HTTP_REFERER
For i=0 To Ubound(OK_URL)
If Instr(LCase(HTTP_REFERER(REFERER)),OK_URL(i))=0 Then'如果来源网址不是以上排除项的话，那就直接返回所指向的网页！
Response.Redirect(URL):Response.End()
End if
Next
Next
End If％>
0
投稿猜你喜欢
模板过滤器定义：在变量输出时对变量的值进行处理作用：可以通过使用过滤器来改变变量的输出显示语法：{{变量 | 过滤器:'参数值1&#- 前言;python由于它动态解释性语言的特性，跑起代码来相比java、c++要慢很多，尤其在做科学计算的时候，十亿百亿级别的运算，让pyth
- Python基本内置数据类型有哪些一些基本数据类型，比如：整型（数字）、字符串、元组、列表、字典和布尔类型。随着学习进度的加深，大家还会接触
- 数据库相关错误的解决办法错误一：数据库连接池超过限制SqlAlchemy QueuePool limit overflow造成连接数超过数据
- Java与mongodb的连接1. 连单台mongodbMongo mg = new Mongo();//默认连本机127.0.0.1 端口
- 在Python中处理异常使用的是try-except代码块，try-except代码块放入让python执行的操作，同时告诉python程序
- Docker 是一个开源项目，为开发人员和系统管理员提供了一个开放平台，可以将应用程序构建、打包为一个轻量级容器，并在任何地方运行。Dock
- 脚本1：这两天用python写了一个删除指定目录下过期时间的脚本。也可能是我初学python，对python还不够熟习，总觉得这个脚本用sh
- 在之前给大家分享过这篇文章：CentOS 7.0下使用yum安装mysql的方法详解，小编觉得不够详细，今天给大家通过本文给大家做个补充，感
- Python list列表添加元素方法实际开发中，经常需要对 Python 列表进行更新，包括向列表中添加元素、修改表中元素以及删除元素。&
- 本文实例讲述了Laravel框架集合用法。分享给大家供大家参考，具体如下：前言集合通过 Illuminate\Support\Collect
- B-树 1 .B-树定义B-树是一种平衡的多路查找树，它在文件系统中很有用。定义：一棵m 阶的B-树，或者为空树，或为满足下列特性的m 叉树
- 利用Python，将多个excel文件合并为一个文件思路利用python xlrd包读取excle文件，然后将文件内容存入一个列表中，再利用
- 错误重现：首先在控制面板里卸载了sqlserver软件，一切正常，然后重启（一定要重启，否则没法重装），执行sqlserver的安装程序，一
- append() 方法向列表的尾部添加一个新的元素。只接受一个参数。>>> num = [1,2]>>>
- 当Anconda安装多个python环境时，或者由于多次卸载安装Anaconda时，导致python的kernel内核启动失败问题，使得ju
- 在使用ionic开发IOS系统微信的时候会有一个苦恼的问题，填写表单的时候键盘会挡住输入框，其实并不算什么大问题，只要用户输入一个字就可以立
- 一、框架架构二、项目目录结构三、框架功能说明解决痛点：通过session会话方式，解决了登录之后cookie关联处理框架天然支持接口动态传参
- dictPython内置了字典：dict的支持，dict全称dictionary，在其他语言中也称为map，使用键-值（key-value）
- 在做开发的朋友特别是和mysql有接触的朋友会碰到有时mysql查询很慢，当然我指的是大数据量百万千万级了，不是几十条了，下面我们来看看解决
