限制IP访问页面--限制IP

最新推荐文章于 2021-07-30 18:04:04 发布

wyj518

最新推荐文章于 2021-07-30 18:04:04 发布

阅读量845

点赞数

分类专栏： asp技术专栏文章标签： function qq

本文链接：https://blog.csdn.net/wyj518/article/details/4703738

版权

asp技术专栏专栏收录该内容

5 篇文章 0 订阅

订阅专栏

'''''''''''''''''''''''''''''''' 限制IP访问页面''''''''''''''''''''''''''''''' '``````作者：yonker QQ：451900800 Function IsBlockedIP() Dim UserIP Dim BlockedIParray(2) '分配ip在数组中 BlockedIParray(0) = "60.0.201.209" BlockedIParray(1) = "218.11.15.212" ' '获取访问者的IP UserIP = Request.ServerVariables("REMOTE_ADDR") ' loop through the Blocked IPs For i = 0 to UBound(BlockedIParray) If UserIP = BlockedIParray(i) Then Response.Redirect "index.asp" 'Response.Redirect "noaccess.asp" End If Next End Function