Resuelto
tenia una basura con un tag sin cerrar, se los dejo, esta para ASP.Net, pero andara con cualquier lenguaje de server
saludos y grax
Código:
<%
S = "<div class=" & """" & "example" & """" & ">"
S = S & "<ul class=" & """" & "menu" & """" & ">"
For i As Integer = 0 To TablaCabeceras.Rows.Count - 1
If Trim(TablaCabeceras.Rows(i).Item("LinkNavegable")) = False Then
If Trim(TablaCabeceras.Rows(i).Item("codLink")) <> 24 And Trim(TablaCabeceras.Rows(i).Item("codLink")) <> 25 Then
S = S & "<li>"
S = S & "<a href="
S = S & """" & "#" & """"
S = S & " title= " & """" & Trim(TablaCabeceras.Rows(i).Item("cabecera")) & """" & ">" & Trim(TablaCabeceras.Rows(i).Item("cabecera")) & "</a>"
S = S & "<ul>"
For j As Integer = 0 To TablaLinks.Rows.Count - 1
If Trim(TablaCabeceras.Rows(i).Item("LinkPadre")) = Trim(TablaLinks.Rows(j).Item("LinkPadre")) And Trim(TablaLinks.Rows(j).Item("LinkNavegable")) = True Then
S = S & "<li>"
S = S & "<a href=" & Trim(TablaLinks.Rows(j).Item("Link")) & " runat=" & """" & "server" & """"
S = S & " NavigateUrl=" & """" & Trim(TablaLinks.Rows(j).Item("Link")) & """" & " Text=" & """"
S = S & Trim(TablaLinks.Rows(j).Item("Descripcion")) & """" & ">" & Trim(TablaLinks.Rows(j).Item("Descripcion")) & "</a>"
S = S & "</li>"
Else
End If
Next
S = S & "</ul>"
Else
S = S & "<li>"
S = S & "<a href='javascript:void(0);' onclick=" & """" & "showPopWin('../cambiarClave.aspx?id=',550,300,null)" & """" & "title='Cambiar clave'>Cambiar clave</a>"
S = S & "</li>"
S = S & "<li>"
S = S & "<a href=" & """" & "../Loginout.aspx" & """" & ">Cerrar Sesion</a>"
S = S & "</li>"
Exit For
End If
End If
S = S & "</li>"
Next
S = S & "</ul></div>"
Response.Write(S)%>