Question

asp的判断IP问题

想达成一个效果.就是 判断IP如果是123.123 IP的前2段
则显示<div class="admin_box"><a href="common/message/system/index.asp"></a></div>
如果不是123.123.这2段IP开头的IP 则什么都不显示.

我自己写了一个
<%
iip=trim(request.ServerVariables("REMOTE_ADDR"))
a="123.180"
if instr(iip,a)>0 then
response.Write""
else
response.Write"<div class="admin_box"><a href="common/message/system/index.asp"></a></div>"
end if
%>

虽说原理写反了. 可是下面.Write的内容里随便些个123什么的能显示.但是用这段Div以后就提示

Microsoft VBScript 编译器错误 错误 '800a0401'
语句未结束
/common/message/index.asp，行 223
response.Write"<div class="admin_box"><a href="common/message/system/index.asp"></a></div>"

不知道是哪里结束.

Answer 1

先把ip地址用数组分拆为4段
再把前2段组成一个新的组合ip 000.000形式,即取iip(0)和iip(1)
然后再 if instr(ip,a)>0 then 进行判别

要不然 ip地址的后二组也可能包含 a="123.180"

追问

不好意思 没有明白

追答

111.111.123.180这是一个完整的ip地址,共4段
111.111.123.180的后2段是123.180 但绝对不是123.180 开头的ip地址

追问

道理明白了.能举个例子吗

追答

111.111.123.180这是一个完整的ip地址,共4段
111.111.123.180的后2段是123.180 但绝对不是123.180 开头的ip地址

这就是一个实例

所以要
先把ip地址用数组分拆为4段
再把前2段组成一个新的组合ip 000.000形式,即取iip(0)和iip(1)
然后再 if instr(ip,a)>0 then 进行判别

追问

我是说
当IP符合 IP段前2段为是123.180 时 显示内容123
当IP不符合IP段前2段是123.180时候 不显示任何内容.
的完整的实例
上面那个我刚试过了 确实有问题.任何IP都可以看的到.

追答

你不是早已选择好了你满意的答案了么,当我在不断回复你的同时?

Answer 2

response.Write"<div class="admin_box"><a href="common/message/system/index.asp"></a></div>"
改为
response.Write"<div class='admin_box'><a href='common/message/system/index.asp'></a></div>"

原因是，双引号的问题