判断网页来路并实现跳转

（老师，昨天的问题补充）我想在网页上加一段asp小程序， 就是在打开本网页前获取访问本网站的来路，判断这个来路是不是指定的来路，不是的话跳转到指定的页面，是的话就什么也不做继续打开网站。 这段程序怎么用asp写呢~？我在网上搜了个答案，不太明白，请老师看一下Function CheckDataFrom() CheckDataFrom = True server_v1=Cstr(Request.ServerVariables("HTTP_REFERER")) server_v2=Cstr(Request.ServerVariables("SERVER_NAME")) If mid(server_v1,8,len(server_v2))<>server_v2 then CheckDataFrom = False End Function If not CheckDataFrom() Then Response.write "禁止从站外提交数据" 最后一行不符合我的要求，它可能是弹出一个窗口，怎么改呢？server_v1=Cstr(Request.ServerVariables("HTTP_REFERER")) server_v2=Cstr(Request.ServerVariables("SERVER_NAME")) 这两行填写来路的域名与服务器地址吗？格式不完整啊。请老师看看。

Response.write "禁止从站外提交数据"
改为
Response.write "<script>alert('禁止从站外提交数据');this.location.href='你要返回的页面';</script>"

最后两句：
1、是得到访问这个地址的前一个地址
2、得到域名

if not checkdatafrom() then response.write "禁止从站外提交数据" '这句不是弹出窗口,是在当前页里出现提示. server_v1=cstr(request.servervariables("http_referer")) 这个是获得url的来路地址 server_v2=cstr(request.servervariables("server_name")) 这个是获得你本机服务器的地址. if mid(server_v1,8,len(server_v2))<>server_v2 这里的8,是指url的来路地址的第8个字符开始的所有字符与你本机的地址相比较. 建议: 先看一下 response.write cstr(request.servervariables("server_name")) 是什么结果, 再对 if mid(server_v1,8,len(server_v2))<>server_v2 进行修改.