做一个CDN加速ASP网站获得用户真正的IP程序

复制代码代码如下所示：
功能checkip（号铃索）的使用规则判断IP的合法性
暗淡的身体
集RE1 = new RegExp
RE1。模式=^ { } { } { 1 0-9 0-9 } { }。1。{ } { } { 1 0-9 0-9 } { }。1美元
RE1。全球= false
RE1。IGNORECASE = false
checkip = re1.test（号铃索）
集RE1 =没有
端功能

复制代码代码如下所示：
功能get_cli_ip（）把真实IP功能，第一http_client_ip然后http_x_forwarded_for然后remote_addr
昏暗的client_ip
如果checkip（request.servervariables（http_client_ip ））=真
get_cli_ip = checkip（request.servervariables（http_client_ip ））
其他的
MyArray =分裂（Request.ServerVariables（， http_x_forwarded_for ）
如果UBound（MyArray）> = 0
client_ip =装饰（MyArray（0））
如果checkip（client_ip）=真
get_cli_ip = client_ip
退出功能
最后如果
最后如果
get_cli_ip = request.servervariables（remote_addr ）
最后如果
端功能