Aggiornamento di un id CSS in un menu include tramite ASP

[yappappeo]

Ciao a tutti,
premetto che sono un principiante in asp (...ho provato a cercare un thread nel forum che facesse al caso mio ma non l'ho trovato; se esistesse, chiedo scusa...).

Ho realizzato un menu di navigazione mediante lista, usando i css:

<ul>
<li id="current"><span>Home</span>[*]<span>menu02</span>[*]<span>menu03</span>[*]<span>menu04</span>
[ecc...][/list]

...e l'ho inserito in un include.

Per fare in modo che l'id "current" si aggiorni posizionandosi nel tag[*] giusto, ho creato una variabile Request.ServerVariables("URL"), quindi ho eseguito una struttura "If... Else", come segue:

<%
Dim current
current = Request.ServerVariables("URL")
%>

<div id="menu
<ul>
<%
If current <> "/miosito.it/index.asp" Then
%>[*]<span>Home</span>
<%
Else
%>
<li id="current"><span>Home</span>
<%
End If
%>

[ecc...]
[/list]
</div>

In pratica ho ripetuto l'If... Else per ogni[*].
Il tutto funziona perfettamente, ma ditemi: esiste un modo più snello e più "bello", magari andando ad agire direttamente sull'id degli[*] senza ripetere due volte ogni singolo listato.

a presto

P.S.: sono nella fase iniziale della realizzazione di un sito, e so già che questa struttura funziona solo se clicco direttamente nei singoli menu di navigazione; non funzionerà più quando all'url si aggiungerà la stringa di interrogazione, in quanto la variabile server "URL" sarà sempre diversa...

[Roby_72]

<%
url = Request.ServerVariables("URL")
%>
<li<%if instr(url,"/index.asp") > 0 then%> id="current"<%end if%>><span>Home</span>
<li<%if instr(url,"/menu02.asp") > 0 then%> id="current"<%end if%>><span>menu02</span>
...
...

Roby

[yappappeo]