asp限制域名会见实现代码

asp 配置只能指定域名可以利用此网站

代码一 剧本之家原创

<% myIp = ",127.0.0.1,localhost,," 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

您大概感乐趣的文章: