神马品牌网武汉一卡通多少钱:网站制作的问题.如何禁止直接从浏览器输入地址访问页面?
来源：百度文库 编辑：神马品牌网 时间：2024/05/09 07:03:48
网站制作的问题.如何禁止直接从浏览器输入地址访问页面?
比如www.qwe.com/hh/index.asp 这个页面我不想让别人直接从浏览器输入地址访问.
我想让别人从www.qwe.com/index.asp这里面的一个连接"去看东西"这里连接到.该怎么办啊?
恩.我也知道.能详细点吗?
比如www.qwe.com/hh/index.asp 这个页面我不想让别人直接从浏览器输入地址访问.
我想让别人从www.qwe.com/index.asp这里面的一个连接"去看东西"这里连接到.该怎么办啊?
恩.我也知道.能详细点吗?
Dim server_v1,server_v2
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
call Go_Error("操作错误！请从首页进入！") '这是我自己定义的错误函数
response.End '你可以为直接退回首页
end if
判断来源
也就是大家常说的防盗连
在 tt/index.asp加入如下代码
if instr(Request.ServerVariables("http_referer"),"http://"&Request.ServerVariables("server_name")&"") = 0 then 提示来源错误！
是asp么？
有个这个
Request.ServerVariables("REMOTE_ADDR")
用他判断就可以
你在index.asp里加一个session变量
然后在子目录的页面里加一个判断，没这个变量就跳到主页或什么都不显示
例如index.asp里session(\"isindexin\")=\"1\"一句
hh/index.asp里第一句
<%if session(\"isindexin\")<>\"1\" then response.redirect \"www.qwe.com/index.asp\" end if%>
或
<%if session(\"isindexin\")=\"1\" then %>
网页代码
<%end if%>