您正在使用 IPV4 [3.94.99.173] 访问本站,您本次已经查看了 1 页
用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器
悟空收录网       [公益]保护绿色环境,构建和谐社会      

【腾讯云】 爆款2核2G3M云服务器首年 61元,叠加红包再享折上折      
[公益] 地球是我家,绿化靠大家      
2024年 清明节 006
2024年 劳动节 033
2025年 元 旦 278
2025年 春 节 306
 
您现在的位置:首页 >> ASP/ASP.net >> 内容
本类新增
本类热门
asp限制域名访问实现代码
内容摘要: 代码一%myIp = ',127.0.0.1,localhost,www.yc58.com,'myurl= request.ServerVariables('SERVER_NAME')Response.write myurlif InStr(myIp,','myurl',')0 thenResponse.write '域名合法'elseResponse.wr......
代码一

<%

myIp = ",127.0.0.1,localhost,www.yc58.com,"

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.yc58.com/"

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处理XML数据的常用函数,读取,转换

 

下一篇:ASP的URLDecode函数URLEncode解码函数

发布日期:2021/6/15
手机扫二维码直达本页
发布时间:12:34:56
点  击:15
录  入:壹家怡园
相关文章
Baidu
YiJiaCMS 7.3.8 build231228(MSSQL) 闽ICP备05000814号-1
本空间由腾讯云(轻量应用服务器)提供,Cloudflare提供加速防护
运行时间载入中.....