asp 根据IP地址自动判断转向分站的代码
来源：asp之家 发布时间：2011-04-14 10:51:00
Function getIpvalue(clientIP)'得到客户端的IP转换成长整型，返回值getIpvalue
On Error Resume Next
Dim strIp, array_Ip
strIp=0
array_Ip = Split(clientIP,".")
If UBound(array_Ip)<>3 Then
getIpvalue=0
Exit Function
End If
For i=0 To 3
strIp=strIp+(CInt(array_Ip(i))*(256^(3-i)))
Next
getIpvalue=strIp
If Err Then getIpvalue=0
End Function
clientIP=request.ServerVariables("REMOTE_HOST")
IpValue=getIpvalue(clientIP)
strSql="select top 1 City from [Ipaddress] where "&IpValue&"
between Ip1 and Ip2"
Set RsIp=conn.execute(strSql)
If RsIp.bof and RsIp.eof then
UrlCity="未知"
Else
UrlCity=RsIp.Fields.Item("City").Value
End If
if instr(UrlCity,"广州")<>0 then
response.Redirect("http://www.cidianwang.com")
end if
if instr(UrlCity,"深圳")<>0 then
response.Redirect("http://www.wendahu.com")
end if
if instr(UrlCity,"上海")<>0 then
response.Redirect("http://www.aspxhome.com")
end if 所用到的IP数据库可以去网上down一个回来
0
投稿猜你喜欢
对于某些项目来说，单页面不能很好的满足需求，所以需要将vue-cli创建的单页面项目改为多页面项目。需要修改以下几个文件：1、下载依赖glo- 在ASP与ASP.NET之间共享对话状态(1)ASP实现原来的ASP对话只能将对话数据保存在内存中。为了将对话数据保存到SQL Server
- 一、定位 oracle分两大块，一块是开发，一块是管理。开发主要是写写存储过程、触发器什么的，还有就是用Oracle的Develop工具做f
- 本文实例为大家分享了Golang实现断点续传的具体代码，供大家参考，具体内容如下1、将文件pic_src.jpg复制到pic_des.jpg
- 前言本文使用 cpu 版本的 TensorFlow 2.4 ，分别搭建单层 Bi-LSTM 模型和多层 Bi-LSTM 模型完成文本分类任务
- 这节介绍接口测试工具postman的基本使用方法， 测试系统就是2.8节自己开发的具有用户增删改查操作的web应用程序——[FirstJav
- 使用Qt Creator创建默认的窗体程序后，主窗口QMainWindow有statusBar状态栏，在此状态栏实时显示时间可以使用下面方法
- 遇到两次mysql密码忘记了？最开始干了最傻的事，卸载了重装。现在有一个不用卸载也能把密码设置回来的办法。知识来源于网络，我这里稍加整理，遇
- Python2.6 之前：字符串转换为整形和浮点型>>>import string>>>string.a
- 背景：大约有3K家商家需要重新确认信息并签订合同。合同是统一的Word版本。每个供应商需要修改合同内的金额部分。人工处理方式需要每个复制粘贴
- 方法一使用以下流式代码，无论下载文件的大小如何，Python 内存占用都不会增加：def download_file(url):
- 总结为：改注册表。顺手写个脚本：import tkinter as tkfrom tkinter import ttkimport winr
- 使用连接（JOIN）来代替子查询(Sub-Queries)MySQL从4.1开始支持SQL的子查询。这个技术可以使用SELECT语句来创建一
- sqlalchemy的常用数据类型数据类型python数据类型说明Integerint整形Stringstr字符串Floatfloat浮点型
- 对于任何一个开发项目来说最大的错误可能就是没有计划。最近，有些人认为开始前无需计划，一个优秀的开发者需要的是随机应变。我敢肯定这样的做法最后
- 本文实例讲述了JS实现的倒计时效果。分享给大家供大家参考，具体如下：我们经常会看到某些网站在注册的时候喜欢搞个按钮倒计时的效果，就是多少秒之
- 前言今天为大家介绍一个利用Python模拟登陆CSDN的案例,虽然看起来很鸡肋,有时候确会有大用处,在这里就当做是一个案例练习吧,提高自己的
- MySQL由于它本身的小巧和操作的高效, 在数据库应用中越来越多的被采用.我在开发一个P2P应用的时候曾经使用MySQL来保存P2P节点,由
- 这个是python的一个内建函数，看书的时候发现了他，mark一下当我们既需要遍历索引同时需要遍历元素的时候，可以考虑使用enumerate
- 前言喜马拉雅是专业的音频分享平台，汇集了有声小说,有声读物,有声书,FM电台,儿童睡前故事,相声小品,鬼故事等数亿条音频，我最喜欢听民间故事
