利用ASP编写的代码实现了域名的限时访问

发布时间：2023-09-02 13:45:37 所属栏目：Asp教程来源：

导读：这篇文章主要介绍了asp限制域名访问实现代码,需要的朋友可以参考下

asp 设置只能指定域名可以使用此网站

<%

myIp = ",127.0.0.1,localhost,www.jb51.net,"

myurl= request.ServerVariables("SERVER_N

这篇文章主要介绍了asp限制域名访问实现代码,需要的朋友可以参考下

asp 设置只能指定域名可以使用此网站

<%

myIp = ",127.0.0.1,localhost,www.jb51.net,"

myurl= request.ServerVariables("SERVER_NAME")

Response.write myurl

if InStr(myIp,","&myurl&",")>0 then

Response.write "域名合法"

else

Response.write "域名不合法"

end if

%>

代码二

myIp = Array("127.0.0.1","jb51")

myHou = new Array("",".com")

myDirect ="//www.jb51.net/"

ip= request.ServerVariables("HTTP_HOST")

j=0

for i=0 to ubound(myIp)

'Response.Write(i&"--"&myIp(i)&"<br>")

if InStr(ip,myIp(i)&myHou(i))>0 then

'Response.Write(myIp(i)&"==")

j=j+1

end if

next

if j<1 then

response.Redirect(myDirect)

end if

上面的代码用到了下面的资料

asp获取当前域名和端口号方法

asp获取当前域名从来就不是什么有难度的事情，但是在实际项目使用中，大家获取的具体URL信息可能是不同的，各个方法获取见下表，而如果要获取当前域名，可以看下面加粗部分：

Request.ServerVariables("SERVER_NAME")'当前域名

Request.ServerVariables("SERVER_PORT")'当前端口

Request.ServerVariables("SCRIPT_NAME")'当前文件名

Request.ServerVariables("QUERY_STRING")'当前页面的传入参数

Request.ServerVariables("HTTP_USER_AGENT")'取得当前浏览器信息

Request("remote_addr")'取得IP

Request.ServerVariables("HTTP_REFERER")'上个页面地址

Request.ServerVariables("HTTP_HOST")'获取当前域名

当采用SERVER_NAME时返回的是不带端口号的URL

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!