Halloj!
Jag skulle nog ta bort fnuttarna i raderna med:
SelectedLink="1"
->
SelectedLink=1
Och sen skulle jag lagt till fnuttar i raderna med:
myArray(1)=ego
->
myArray(1)="ego"
Frågan#1
Jag har knåpat ihop en liten meny där jag vill att det ska synas vilken sida man är på genom att motsvarande menyval har avvikande bakgrundsfärg. Jag har försökt enligt nedanstående kod.
Problemet är bara att jag aldrig får fetmarkerad if-sats uppfylld trots att värdena blir lika när de ska. Det är säkert något fnutt-fel eller liknande, men hjälp mig, snälla rara ni! :)
dim SelectedLink, myArray(), i
myArray(1)=ego
myArray(2)=dagbok
osv..
link=request.servervariables("url")
Select Case Link
Case "/ego.asp" SelectedLink="1"
Case "/dagbok.asp" SelectedLink="2"
osv...
end select
function PrintLinks (i)
[b]if SelectedLink=i then[/b]
response.write "<li><a href="""&myArray(i)&".asp"" class=""selected""><img src=""img/meny/"&myArray(i)&".gif"" width=""82"" height=""15"" alt="""" /></a></li>"
else
response.write "<li><a href="""&myArray(i)&".asp""><img src=""img/meny/"&myArray(i)&".gif"" width=""82"" height=""15"" alt="""" /></a></li>"
end if
end function
for i=1 to 14
PrintLinks (i)
next