我想将这段改一下!

<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个字,没有"镇"的就显示"区"后边的,没有"区"就显示"市"后边的!


感谢大家!!

IF树

我是新手不懂啊

我就告诉你这么一点，IF是可以嵌套的。

新手不要舍不得买书，除非你有很强的程序设计功底。

<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树？

你又不是菜鸟……干嘛不用ELSEIF

或者写个IIF也挺好用的

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