怎样防止用户在地址栏直接输入地址来访问我的ASP页面?
答案:2 悬赏:80 手机版
解决时间 2021-11-09 07:37
- 提问者网友:玫瑰园
- 2021-11-08 07:52
怎样防止用户在地址栏直接输入地址来访问我的ASP页面?
最佳答案
- 五星知识达人网友:逐風
- 2021-11-08 09:30
<%
'防止直接输入网址
ComeUrl=trim(request.ServerVariables("HTTP_REFERER"))
if ComeUrl="" then
response.write "对不起,为了系统安全,不允许直接输入地址访问本页面
"
response.end
else
cUrl=trim("http://"; & Request.ServerVariables("SERVER_NAME"))
if ubound(split(ComeUrl,":"))>1 then
cUrl=cUrl & ":" & Request.ServerVariables("SERVER_PORT")
end if
cUrl=cUrl & request.ServerVariables("SCRIPT_NAME")
if lcase(left(ComeUrl,instrrev(ComeUrl,"/")))<>lcase(left(cUrl,instrrev(cUrl,"/"))) then
response.write "对不起,为了系统安全,不允许从外部链接地址访问本页面
"
response.end
end if
end if
%>
'防止直接输入网址
ComeUrl=trim(request.ServerVariables("HTTP_REFERER"))
if ComeUrl="" then
response.write "对不起,为了系统安全,不允许直接输入地址访问本页面
"
response.end
else
cUrl=trim("http://"; & Request.ServerVariables("SERVER_NAME"))
if ubound(split(ComeUrl,":"))>1 then
cUrl=cUrl & ":" & Request.ServerVariables("SERVER_PORT")
end if
cUrl=cUrl & request.ServerVariables("SCRIPT_NAME")
if lcase(left(ComeUrl,instrrev(ComeUrl,"/")))<>lcase(left(cUrl,instrrev(cUrl,"/"))) then
response.write "对不起,为了系统安全,不允许从外部链接地址访问本页面
"
response.end
end if
end if
%>
全部回答
- 1楼网友:佘樂
- 2021-11-08 10:36
判断来源,如果为空则response.end
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯