OBS! Detta sker endast i Internet Explorer, ej Mozilla & Co
Frågan#1
Varför hoppar min "start" länk en pixel upp och ner beroende på om man är på startsidan eller inte?
Sub topNav
With Response
.Write "<table bgcolor=474747 cellpadding=0 cellspacing=5>" & VBCRLF
.Write "<tr>" & VBCRLF
.Write "<td valign=middle><img border=0 width=16 src=img/trans.gif></td>" & VBCRLF
If p = "start" Then
.Write "<td class=topNavStart valign=middle>Start </td>" & VBCRLF
Else
.Write "<td valign=middle><a class=topNavStart href=/?p=start>Start</a> </td>" & VBCRLF
End If
End With
'### TOPPKATEGORIER START ###
Do Until RS.EOF
With Response
.Write "<td width=1 bgcolor=676767 valign=middle><img border=0 width=1 src=img/trans.gif></td>" & VBCRLF
If tc = RS("Id") Then
.Write "<td bgcolor=676767 valign=middle> <font class=topNavAct>"& RS("Name") &"</font> </td>" & VBCRLF
Else
.Write "<td valign=middle> <a class=TopNav href=/?p=cat&tc="& RS("Id") &">"& RS("Name") &"</a> </td>" & VBCRLF
End If
End With
RS.MoveNext
Loop
'### TOPPKATEGORIER STOPP ###
With Response
.Write "</tr>" & VBCRLF
.Write "</table>" & VBCRLF
End With
End Sub