代码表示
请教各位高手,以下代码表示有何错误呢?<div class="top"></div>
<div class="menu"><%
dim menus,menui,menustr,filename
menus="首页|default.asp|酒店纵览|about.asp|在线订房|online.asp|酒店动态|news.asp|商务中心|product.asp|餐饮服务|search.asp|宾客留言|guest.asp|联系我们|links.asp"
menus=split(menus,"|)
menustr=""
filename=Request.ServerVariables("SCRIPT_NAME")
filename=mid(filename,InStrRev(filename,"/")+1,len(filename))
for menui=LBound(menus) to UBound(menus) step 2
menustr=menustr&"<a href='"&menus(menui+1)&"'"
if(filename=menus(menui+1)) then
menustr=menustr&"class="cur""
end if
menustr=menustr&">"&menus(menui)&"</a>"
next
Response.Write(menustr)%>
.......
[ 本帖最后由 TZTJ 于 2010-8-8 11:37 编辑 ]
