home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
221.214.14.186
/
221.214.14.186.tar
/
221.214.14.186
/
jn
/
weishan
/
WEATHER
/
function.inc.asp
< prev
next >
Wrap
Text File
|
2005-04-12
|
569b
|
20 lines
<%
function getWebIp()
dim ip
ip=Request.ServerVariables("REMOTE_ADDR")
if (left(ip,6)="80.0.0" or left(ip,6)="60.0.0" or left(ip,10)="172.18.200" or ip="127.0.0.1" or ip="218.104.5.50") then
getWebIP="80.0.0.1"
else
getWebIP="www.sdxnw.gov.cn"
end if
end function
function getdataIp()
dim ip
ip=Request.ServerVariables("REMOTE_ADDR")
if (left(ip,6)="80.0.0" or left(ip,6)="60.0.0" or left(ip,10)="172.18.200" or ip="127.0.0.1" or ip="218.104.5.50") then
getdataIP="80.0.0.3"
else
getDataIP="221.214.14.188"
end if
end function
%>