注册 登录
编程论坛 ASP技术论坛

[求助]关于显示的问题!

xixsl 发布于 2007-09-07 16:13, 430 次点击
我想将这段改一下!

<td><a target="_blank" href="xinxiinfo.asp?fox=<%=rsfo1("id")%>" title="<%=rsfo1("fbgs")%>">
<%
if len(rsfo1("fbgs"))>10 then
response.Write mid(rsfo1("fbgs"),instr(rsfo1("fbgs"),"市")+1,4)
else
response.Write(rsfo1("fbgs"))
end if%>
</a></td>


改成用户注册时ID有"镇"就先显示镇后边的4个字,没有"镇"的就显示"区"后边的,没有"区"就显示"市"后边的!


感谢大家!!
7 回复
#2
multiple19022007-09-07 16:24

IF树

#3
xixsl2007-09-07 16:35
我是新手不懂啊
#4
multiple19022007-09-07 16:42
我就告诉你这么一点,IF是可以嵌套的。

新手不要舍不得买书,除非你有很强的程序设计功底。
#5
xixsl2007-09-07 16:49
#6
yms1232007-09-07 17:38
<td><a target="_blank" href="xinxiinfo.asp?fox=<%=rsfo1("id")%>" title="<%=rsfo1("fbgs")%>">
<%
Function MidStr(vStr,KStr)
Dim start,length
start=InStr(vStr,KStr)
length=Len(vStr)-start
MidStr=Mid(vStr,start,length)
End Function
if len(rsfo1("fbgs"))>10 then
IF Instr(rsfo1("fbgs"),"镇")<>0 Then
Response.Write MidStr(rsfo1("fbgs"),"镇")
Else
IF Instr(rsfo1("fbgs"),"区")<>0 Then
Response.Write MidStr(rsfo1("fbgs"),"区")
Else
IF Instr(rsfo1("fbgs"),"市")<>0 Then
Response.Write MidStr(rsfo1("fbgs"),"市")
End IF
End IF
End IF
else
response.Write(rsfo1("fbgs"))
end if
%>
</a></td>
应该是这个IF树?
#7
multiple19022007-09-07 17:44
你又不是菜鸟……干嘛不用ELSEIF

或者写个IIF也挺好用的
#8
yms1232007-09-07 18:01
以下是引用multiple1902在2007-9-7 17:44:03的发言:
你又不是菜鸟……干嘛不用ELSEIF

或者写个IIF也挺好用的

太简写楼主再发个帖子说不明白,这样楼主应该明白了。

1