Hvis det er sidste så vis ikke seperator
Hej Eksperter,Jeg har bikset lidt menu sammen, men har problemer med at få scriptet til ikke at vise seperations billede efter sidste menupunkt...
'############################################################
'# TOPMENU - Højre #
'############################################################
response.write "<td width=""35%"" class=""menuLvl1SecTpl"" align=""right"" bgcolor=""#003A62""><table cellpadding=""0"" cellspacing=""0"" border=""0""><tr>"
set objRec6 = server.createobject("ADODB.recordset")
strSQL = "SELECT * FROM hjemmeside_topmenu WHERE menutype = 'Undermenu' ORDER BY sortering ASC"
objRec6.Open strSQL, objConn, 3, 1, 1
while not objRec6.EOF
if CInt(objRec6("id")) = CInt(intID) then
response.write "<td class=""menuLvl1SecChosen""><a href=""dokumenter.asp?topmenu="& intID &"&undermenu="& objRec6("link") &""">"& objRec6("navn") &"</a></td>"
response.write "<td class=""menuLvl1SecBar""><img src=""images/menu/menuLvl1Bar.gif"" border=""0"" alt=""""></td>"
else
response.write "<td class=""menuLvl1Sec""><a href=""dokumenter.asp?topmenu="& intID &"&undermenu="& objRec6("link") &""">"& objRec6("navn") &"</a></td>"
response.write "<td class=""menuLvl1SecBar""><img src=""images/menu/menuLvl1Bar.gif"" border=""0"" alt=""""></td>"
end if
objRec6.MoveNext
Wend
objRec6.close
response.write "</tr></table></td></tr>"