根据IP显示不同网页
来源:互联网 发布:怎么能删除淘宝客活动 编辑:程序博客网 时间:2024/04/30 09:26
<%
function cip(sip)
tip=cstr(sip)
sip1=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip2=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip3=left(tip,cint(instr(tip,".")-1))
sip4=mid(tip,cint(instr(tip,".")+1))
cip=cint(sip1)*256*256*256+cint(sip2)*256*256+cint(sip3)*256+cint(sip4)
end function
ipconnpath = "count/ip.mdb"
vip=Request.servervariables("REMOTE_ADDR")
function cip(sip)
tip=cstr(sip)
sip1=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip2=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip3=left(tip,cint(instr(tip,".")-1))
sip4=mid(tip,cint(instr(tip,".")+1))
cip=cint(sip1)*256*256*256+cint(sip2)*256*256+cint(sip3)*256+cint(sip4)
end function
ipconnpath = "count/ip.mdb"
vip=Request.servervariables("REMOTE_ADDR")
%><%
set connip=server.createobject("adodb.connection")
DBPath = Server.MapPath(ipconnpath)
connip.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set connip=server.createobject("adodb.connection")
DBPath = Server.MapPath(ipconnpath)
connip.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
ipnow=cip(vip)
Set rsip = Server.CreateObject("ADODB.Recordset")
sql="select * from ip where (onip<=" & ipnow & " and offip>=" & ipnow & ")"
rsip.Open sql,connip,1,1
sql="select * from ip where (onip<=" & ipnow & " and offip>=" & ipnow & ")"
rsip.Open sql,connip,1,1
vwhere=left(rsip("addj"),2)
rsip.Close
set rsip=nothing
connip.Close
set connip=nothing%>
rsip.Close
set rsip=nothing
connip.Close
set connip=nothing%>
<%
select case vwhere
case "湖南"
Response.Redirect "web/"
case "河南"
Response.Redirect "home/"
case else
Response.Redirect "main/"
end select
%>
select case vwhere
case "湖南"
Response.Redirect "web/"
case "河南"
Response.Redirect "home/"
case else
Response.Redirect "main/"
end select
%>
- 根据IP显示不同网页
- 使用 根据语言环境不同 而显示不同的 资源本地化 ASP.NET 网页
- 使用 根据语言环境不同 而显示不同的 资源本地化 ASP.NET 网页
- 使用 根据语言环境不同 而显示不同的 资源本地化 ASP.NET 网页
- ecshop不同城市显示不同商品之后台前端根据ip获取城市并屏蔽商品
- 根据IP显示地址
- 根据ip限制访问网页
- 网页IP显示代码
- PHP根据IP跳转不同城市代码
- PHP根据IP跳转不同城市代码
- nginx根据域名转发不同ip端口
- 点击下拉菜单按钮根据下拉框的值在当前页面显示不同的网页内容。
- 根据时间显示不同的广告
- 根据roles显示不同的sitemap
- 根据类别显示不同的页面元素
- 根据roles显示不同的sitemap
- EXTJS 根据值显示不同图片
- 根据数据,显示不同的数据颜色
- 在一个时间段内的间隔查询
- Asp.net源码本周更新(5.21-5.27)
- 关于GeoDataBase的建模的几个问题
- SQL_1
- 深入剖析C++重载函数的应用
- 根据IP显示不同网页
- 强力推荐重读J2EE development without EJB
- C#GDI+图元组态和IronPython脚本应用之LED影像系统
- final test
- 什么是HRESULT?
- 建设和谐企业,促进爱岗敬业
- blog.csdn.net 博客的使用
- 软件公司是怎么消亡的?
- 被爱抛弃