ASP－－IP字段截取

IP字段截取，判断访问者ip，根据ip来显示不同图片,很简单的程序

<％
ip=request.servervariables("remote_addr")
for i=1 to 2
if right(ip,1)="." then
exit for
else
ip=left(ip,len(ip)-3)
end if
next
Select case ip
case "10.141."
％>
document.write('<img border="0" src=https://www.aspxhome.com/images/logo.gif">');
<％
case else
％>
document.write('<img border="0" src=http://www.cidianwang.com/images/logo.gif">');
<％
End Select
％>