Problem med menu - kan ikke klikke på navnet

Hvad hvis du flytter rundt så <div class=toplinks> er før billet:

response.Write "<div class=toplinks><IMG class=billede alt='Åben undermenu' src='grafik/pil.gif'>" & rs("navn") & "</div>" & vbCrLf

Så virker det slet ikke! :(

Vil du se hele koden for menuen? Den fylder ca. 1 side.

Nå, åbenbart ikke...

Jeg kan se det i det andet spørgsmål?? men så kan jeg ikke lige se hvad det kan være..

Koden i det andet spg er uden script og asp koden. Kunne det tænkes at problemet ligger der?

Her er scriptet. Advarsel! Det er meget uoverskueligt! Og nej, jeg har ikke selv lavet det.

<script type="text/javascript">
<!--
function findObj(theObj, theDoc) {
  var p, i, foundObj; 
  if(!theDoc) theDoc = document;
  if( (p = theObj.indexOf("?")) > 0 && parent.frames.length) {
    theDoc = parent.frames[theObj.substring(p+1)].document;
    theObj = theObj.substring(0,p);}
  if(!(foundObj = theDoc[theObj]) && theDoc.all) foundObj = theDoc.all[theObj];
  for (i=0; !foundObj && i < theDoc.forms.length; i++)
    foundObj = theDoc.forms[i][theObj];
  for(i=0; !foundObj && theDoc.layers && i < theDoc.layers.length; i++)
    foundObj = findObj(theObj,theDoc.layers[i].document);
  if(!foundObj && document.getElementById) foundObj = document.getElementById(theObj);
  return foundObj;
}

function showHideLayers() {
  var i, visStr, obj, args = showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) {
    if ((obj = findObj(args[i])) != null) {
      visStr = args[i+2];
      if (obj.style) {
        obj = obj.style;
        if(visStr == 'show') visStr = 'visible';
        else if(visStr == 'hide') visStr = 'hidden';}
      obj.visibility = visStr;}
  }
}


function skiftKlasse(){
var i,x,tB,j=0,tA=new Array(),arg=skiftKlasse.arguments;
if(document.getElementsByTagName){for(i=4;i<arg.length;i++){tB=document.getElementsByTagName(arg[i]);
  for(x=0;x<tB.length;x++){tA[j]=tB[x];j++;}}for(i=0;i<tA.length;i++){
  if(tA[i].className){if(tA[i].id==arg[1]){if(arg[0]==1){
  tA[i].className=(tA[i].className==arg[3])?arg[2]:arg[3];}else{tA[i].className=arg[2];}
  }else if(arg[0]==1 && arg[1]=='none'){if(tA[i].className==arg[2] || tA[i].className==arg[3]){
  tA[i].className=(tA[i].className==arg[3])?arg[2]:arg[3];}
  }else if(tA[i].className==arg[2]){tA[i].className=arg[3];}}}}
}
//-->



Her er ASP koden(Selv lavet ;) ):

<%
    tal = 1
    under = 0
    SQL = "SELECT * FROM menu"
    Set rs = Conn.Execute(SQL)
               
    do while not rs.eof
        response.Write "<p class=""mndivhdr"" onClick=""skiftKlasse(1,'mn" & tal & "','showit','hideit','div');skiftKlasse(1,'but" & tal & "','mnminus','mnplus','img')"">" & vbCrLf
                               
        SQL = "SELECT * FROM undermenu where menuid='" & rs("id") & "'"
        Set res = Conn.Execute(SQL)
        under = 0
        if not res.eof then
            under = 1
            response.Write "<IMG class=billede alt='Åben undermenu' src='grafik/pil.gif'><div class=toplinks> " & rs("navn") & "</div>" & vbCrLf
        else
            response.Write "<a class=""links"" href=""" & rs("link") & """>" & rs("navn") & "</a>" & vbCrLf
        end if
        if not res.eof then
            under = 1
            response.Write "<div id=""mn" & tal & """ class=""hideit"">" & vbCrLf
               
            do while not res.eof
                response.Write "    <a class=""sublinks"" href=""" & res("link") & """>" & res("navn") & "</a><br>" & vbCrLf
                res.movenext
            loop
        end if

        if under = 1 then
            response.Write "</div>" & vbCrLf
        end if
        rs.movenext
        tal = tal + 1
    loop
%>

Det er sikkert ikke opbygget optimalt, men det virker!(sådan da) ;)

Er der virkelig ingen der har bare en lille ide om hvad der kan være galt???

HJÆÆLP!!

lukket