Código completo agregando el atributo title:
Código HTML:
Ver original Cesta
<a href="ec_cesta.asp?cestanav=2">Login
</a>
<a href="ec_cesta.asp?cestanav=3">Envío
</a>
<a href="ec_cesta.asp?cestanav=4">Pago
</a>
<a href="ec_cesta.asp?cestanav=5">Confirmación
</a>
Código CSS:
Ver original.ec_cestanav{
float:left;
width:100%;
list-style:none;
}
.ec_cestanav li{
float: left;
width: 20%;
background-image: url('Images_sys/ico32_ball_gris.png');
background-repeat: no-repeat;
background-position: center;
vertical-align:bottom;
text-align:center;
height:64px;
text-shadow: #D1D1D1 0 2px 2px;
font-size: 1.3em;
}
.ec_cestanav li[title]{
background-image: url('Images_sys/ico32_ball_verde.png');
}
Y aquí el código Asp:
Código ASP:
Ver original<%
'Nos posicionamos en la barra de navegación. La posición actual
'no tendrá enlace y el fondo será verde
CestaNav=Request.QueryString("cestanav")
If CestaNav = "" Then CestaNav = 1
%>
<ul class="ec_cestanav">
<%
Dim Opc_CestaNav(5)
Opc_CestaNav(1) = "Cesta"
Opc_CestaNav(2) = "Login"
Opc_CestaNav(3) = "Envío"
Opc_CestaNav(4) = "Pago"
Opc_CestaNav(5) = "Confirmación"
For I=1 To 5
%>
<li <%If Cint(CestaNav) = I Then Response.Write "title=''"%> >
<%
If Cint(CestaNav) <> I Then
%>
<a href="<%=Nombre_Pagina%>?cestanav=<%=I%>"><%=Opc_CestaNav(I)%></a>
<%
Else
Response.Write Opc_CestaNav(I)
End If
%>
</li>
<%
Next
%>
</ul>