Question

asp如何根据当前页而改变菜单CSS样式?

<%
Dim ShopList
Set ShopList=server.CreateObject("adodb.recordset")
ShopList.open "select * from Shop_Class order by Cn_Line asc",conn,1,1
while not ShopList.eof
response.Write"<li><a href=""ProductList.asp?id="&ShopList("id")&""">"&ShopList("Cn_Title")&"</a></li>" & vbCrLf
ShopList.movenext
wend
ShopList.close
Set ShopList=nothing
%> 如何实现一下效果呢？<li><a href="/1/Index.html" class="Three_Nav_On">分类产品一</a></li>
<li><a href="/2/Index.html">分类产品二</a></li>
<li><a href="/3/Index.html">分类产品三</a></li>
<li><a href="/4/Index.html">分类产品四</a></li> 点击那个链接就赋予class="Three_Nav_On" 样式？ 知道的帮我写下啦。。。

Answer 1

如果 你页面是动态现面的话，你可以定义一个变量，不同页面给不同值 如果 是静态页面可用js

Answer 2

写一个JS比如这个<li><a href="/2/Index.html">分类产品二</a></li>改成<li><a href="/2/Index.html" onclick="javascript:this.className='Three_Nav_On' ">分类产品二</a></li>

Answer 3

你在1234 的4个文件夹里面各放一个css文件即可。