Søg
Avatar billede chrisrj Forsker
28. december 2002 - 12:56 Der er 89 kommentarer og
1 løsning

Vis aktivt menupunkt

Jeg har en dynamisk menu, hvor jeg gerne vil vise hvilket menupunkt brugeren er på.

Det SKAL virke med stylesheets.

Det jeg vil, er at sætte et lille billede ved siden af menupunktet.

Eksempel:

en menu:

Menupunkt 1
Menupunkt 2
Menupunkt 3
Menupunkt 4

Brugerne klikker på f.eks. Menupunkt 2:

  Menupunkt 1
->Menupunkt 2
  Menupunkt 3
  Menupunkt 4

Er der en der kan lave det?? - jeg er IKKE stærk i java.

Jeg har fundet en menu der gør næsten som jeg vil have:
http://javascript.internet.com/navigation/category-menus.html
men jeg kan ikke overskue koden, som sagt ved jeg ikke ret meget om java.
Avatar billede armena Nybegynder
28. december 2002 - 12:58 #1
hvad med noget i stil med Eksperten.dk's menu?? Hvis ja, Tjek www.dhtmlcentral.com :D
Avatar billede chrisrj Forsker
28. december 2002 - 13:05 #2
mja, lidt. Men der skal kun være en pil når brugeren klikker. Kan du lave det eller pille det ud af en af de menuer?
Avatar billede miknil Nybegynder
28. december 2002 - 13:36 #3
Jeg kan ikkke lige gennemskue hvordan det kan gøres med stylesheets (måske hvis du putter linksene ind i en <li> og skifter typen af bullet !?)

Men ihvertfald kan det gøres med javascript - f.x

<HTML><HEAD>
<script>
function InsertLink(name, location)
{
    if (document.location.href == location)
        document.write('--> ');
    document.write('<a href="'+location+'">'+name+'</a><br>');       
}
</script>
</head>
<BODY>
<script>
    InsertLink('menu 1','file:///c:/test1.htm');
    InsertLink('menu 2','file:///c:/test2.htm');
    InsertLink('menu 3','file:///c:/test3.htm');
</script>
</BODY>
</HTML>


Michael
Avatar billede chrisrj Forsker
28. december 2002 - 13:37 #4
Er du igang eller sidder jeg og venter forgæves?
Avatar billede chrisrj Forsker
28. december 2002 - 13:38 #5
sorry det var til armena
Avatar billede pelkjaer Nybegynder
28. december 2002 - 13:38 #6
Tålmodighed er en dyd :)
Avatar billede chrisrj Forsker
28. december 2002 - 13:40 #7
det er rigtigt. Men det er feed back også... :)
Avatar billede chrisrj Forsker
28. december 2002 - 13:42 #8
miknil -> hvad skal jeg med det? jeg har en menu, jeg skal "bare" bruge noget funktionalitet der viser det aktive menupunkt.

pelkjaer -> Ved du hvordan det kan/skal laves?
Avatar billede miknil Nybegynder
28. december 2002 - 13:42 #9
I dit tilfælde skal 'file:///c:/test1.htm' naturligvis usdkiftes med det
korrekte link sikkert noget i stil med 'http://www.minserver.dk/minside.html'

Hvis du har menuen i en frame for sig selv skal du også udskifte

document.location.href med noget i stil med
document.frames['minframe'].location.href


Michael
Avatar billede miknil Nybegynder
28. december 2002 - 13:43 #10
Chrisjr - det er jo netop hvad der sker - du får en pil foran det active menupunkt
Avatar billede chrisrj Forsker
28. december 2002 - 13:44 #11
åhhh sorry. Jeg var vist lidt for hurtig... kigger lige på det... :)
Avatar billede miknil Nybegynder
28. december 2002 - 13:44 #12
Hvad mener du egentlig med at det
SKAL være stylesheets når du heletiden nævner Java i dit spørgsmål ?

Michael
Avatar billede chrisrj Forsker
28. december 2002 - 13:47 #13
Det er fordi en stor del af mit site, bla. menuen, er lavet med CSS.
Avatar billede chrisrj Forsker
28. december 2002 - 13:48 #14
Se her:

<body onLoad="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnbutblank','mnplus','img');skiftKlasse(0,'none','expblank','expandit','img');skiftKlasse(0,'none','expblank2','expandit2','img'); showHideLayers('HideOnloadDiv','','hide');">
        <div id="HideOnloadDiv" style="position:absolute; left:0px; top:0px; width:100%; height:100%; background-color:#ffffff; visibility:visible; z-index:2"></div>
        <div id="Layer1" style="position:absolute; left:25px; top:25px; width:160px; z-index:1">
            <p class="oclinks">
                <a href="java script:;" onClick="skiftKlasse(0,'none','hideit','showit','div');skiftKlasse(0,'none','mnplus','mnminus','img')">
                    <br>
                    <strong>&Aring;ben</strong></a> | <a href="java script:;" onClick="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnminus','mnplus','img')">
                    <strong>Luk</strong></a>
            </p>
            <br>
            <br>
            <!-- #include file="databaseconn.asp" -->
            <%
                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
               
            %>
        </div>
    </body>
Avatar billede chrisrj Forsker
28. december 2002 - 13:50 #15
Jeg kan sku' finde ud af hvordan jeg skal sætte dit forslag ind.
Gider du at hjælpe mig?
Avatar billede chrisrj Forsker
28. december 2002 - 13:50 #16
Jeg kan sku' IKKE finde ud af hvordan jeg skal sætte dit forslag ind.
Gider du at hjælpe mig?
Avatar billede chrisrj Forsker
28. december 2002 - 13:54 #17
Jeg har lige testet din menu sådan her:

<HTML><HEAD>
<script>
function InsertLink(name, location)
{
    if (document.location.href == location)
        document.write('--> ');
    document.write('<a href="'+location+'">'+name+'</a><br>');       
}
</script>
</head>
<BODY>
<script>
    InsertLink('menu 1','test.asp');
    InsertLink('menu 2','test2.asp');
    InsertLink('menu 3','test3.asp');
</script>
</BODY>
</HTML>

Men der sker intet.
Avatar billede miknil Nybegynder
28. december 2002 - 13:55 #18
Beklager, det kan jeg ikke lige gennemskue, fx. ser alle dine href's tomme ud

Michael
Avatar billede miknil Nybegynder
28. december 2002 - 13:56 #19
Du skal skifte test.asp ud med den absolutte sti  fx http://localhost/test.asp
Avatar billede chrisrj Forsker
28. december 2002 - 13:57 #20
tomme?? Hvordan tomme?

Jeg kan ikke bruge absolutte stier...

Kan det ikke laves uden?
Avatar billede miknil Nybegynder
28. december 2002 - 14:03 #21
Jeg var galt på den ang dine href's de er ikke tomme (hviklet du jo nok var klar over)


do while not res.eof
response.Write "<script>"
response.Write "InsertLink(sublinks,res("link"),res("navn"));"
response.Write "</script>"
res.movenext

og så laver du scriptet om til.

function InsertLink(class,link,name)
{
    if (document.location.href == link)
        document.write('--> ');
    document.write('<a class='+class+' href="'+link+'">'+name+'</a><br>');       
}







Michael
Avatar billede miknil Nybegynder
28. december 2002 - 14:05 #22
Hvis du ikke har den absolutte sti i basen så må du tilføje den i scriptet

fx

function InsertLink(class,link,name)
{
    var HostAddr = 'http://localhost/';
    if (document.location.href == (HostAddr+link) )
        document.write('--> ');
    document.write('<a class='+class+' href="+link+'">'+name+'</a><br>');       
}
Avatar billede miknil Nybegynder
28. december 2002 - 14:07 #23
Der røg en ' i farten - den rigtige linie er
document.write('<a class='+class+' href="'+link+'">'+name+'</a><br>');
Avatar billede chrisrj Forsker
28. december 2002 - 14:08 #24
ok, det ser godt ud. Jeg prøver lige een gang til... ;)
Avatar billede chrisrj Forsker
28. december 2002 - 14:12 #25
Hvad hvis jeg vil erstatte --> med et billede?
Avatar billede chrisrj Forsker
28. december 2002 - 14:13 #26
..og virker der her også når der er undermenuer?
Avatar billede miknil Nybegynder
28. december 2002 - 14:14 #27
så skifter du bare  document.write('--> ');

ud med

document.write('<img src="billede.gif">');


Michael
Avatar billede chrisrj Forsker
28. december 2002 - 14:16 #28
stort. tak
Avatar billede miknil Nybegynder
28. december 2002 - 14:18 #29
I givet fald det det virker - og du skulle få lyst til at aflevere lidt points :-)
Avatar billede chrisrj Forsker
28. december 2002 - 14:23 #30
hehe... Jeg vil gerne give points. men ikke før det virker sammen med min menu - ihvertfald ikke ret mange!!! ;)

Har du mod på det?

Jeg har fået dit eksempel til at virke:

<HTML><HEAD>

<script>
function InsertLink(name, link)
{
    var HostAddr = 'http://localhost/miljoselskab/www/';
    if (document.location.href == (HostAddr+link) )
        document.write('--> ');
    document.write('<a href="'+link+'">'+name+'</a><br>');   
}

</script>
</head>
<BODY>
<script>
    InsertLink('menu 1','index.asp?page=test.asp');
    InsertLink('menu 2','index.asp?page=test2.asp');
    InsertLink('menu 3','index.asp?page=test3.asp');
</script>
</BODY>
</HTML>


Men jeg kan ikke liige gennemskue hvordan jeg skal implementere det.

Jeg ved det skal ind ved "..class=""links""..." og "..class=""sublinks""..."
Avatar billede miknil Nybegynder
28. december 2002 - 14:37 #31
Her er hele koden så med scriptet i toppen - og de to menuområder udskiftet

Bemærk der er ændret i scriptet

<script>
function InsertLink(class,link,name)
{
    var HostAddr = 'http://localhost/';
    if (document.location.href == (HostAddr+link) )
        document.write('<img src="image.gif">');
    document.write('<a class='+class+' href="+link+'">'+name+'</a>');       
}
</script>



<body onLoad="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnbutblank','mnplus','img');skiftKlasse(0,'none','expblank','expandit','img');skiftKlasse(0,'none','expblank2','expandit2','img'); showHideLayers('HideOnloadDiv','','hide');">
        <div id="HideOnloadDiv" style="position:absolute; left:0px; top:0px; width:100%; height:100%; background-color:#ffffff; visibility:visible; z-index:2"></div>
        <div id="Layer1" style="position:absolute; left:25px; top:25px; width:160px; z-index:1">
            <p class="oclinks">
                <a href="java script:;" onClick="skiftKlasse(0,'none','hideit','showit','div');skiftKlasse(0,'none','mnplus','mnminus','img')">
                    <br>
                    <strong>&Aring;ben</strong></a> | <a href="java script:;" onClick="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnminus','mnplus','img')">
                    <strong>Luk</strong></a>
            </p>
            <br>
            <br>
            <!-- #include file="databaseconn.asp" -->
            <%
                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
    ' NY BLOK BEGIN   
        response.Write "<script>"
        response.Write "InsertLink('links',res("link"),res("navn"));"
        response.Write "</script>"
    ' NY BLOK SLUT
    ' original  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
          ' NY BLOK BEGIN   
        response.Write "<script>"
        response.Write "InsertLink('sublinks',res("link"),res("navn"));"
        response.Write "</script><br>"
        ' NY BLOK SLUT
                    ' original 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
               
            %>
        </div>
    </body>

God fornøjelse

Michael
Avatar billede miknil Nybegynder
28. december 2002 - 14:39 #32
Forba*** copy og paste, der er en fejl i linien

document.write('<a class='+class+' href="+link+'">'+name+'</a>'); 

der mangler et ' efter href="'

document.write('<a class='+class+' href="'+link+'">'+name+'</a>'); 



Mik
Avatar billede chrisrj Forsker
28. december 2002 - 17:46 #33
Det ser interessant ud. Jeg har ikke haft tid til at kigge på det endnu. Jeg vender tilbage når jeg har kigget på det. :)
Avatar billede chrisrj Forsker
28. december 2002 - 22:02 #34
Nu har jeg prøvet det. Virker ikke :(

Der kommer ca. 10.000.000 fejl. :)

først en hvor funktionen starter. "Id var ventet"
derefter 9 fejl der lyder: "et objekt var ventet"

Sådan ser min kode ud nu:


<body onLoad="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnbutblank','mnplus','img');skiftKlasse(0,'none','expblank','expandit','img');skiftKlasse(0,'none','expblank2','expandit2','img'); showHideLayers('HideOnloadDiv','','hide');">
        <div id="HideOnloadDiv" style="position:absolute; left:0px; top:0px; width:100%; height:100%; background-color:#ffffff; visibility:visible; z-index:2"></div>
        <div id="Layer1" style="position:absolute; left:25px; top:25px; width:160px; z-index:1">
            <p class="oclinks">
                <a href="java script:;" onClick="skiftKlasse(0,'none','hideit','showit','div');skiftKlasse(0,'none','mnplus','mnminus','img')">
                    <br>
                    <strong>&Aring;ben</strong></a> | <a href="java script:;" onClick="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnminus','mnplus','img')">
                    <strong>Luk</strong></a>
            </p>
            <br>
            <br>
            <!-- #include file="databaseconn.asp" -->
            <%
                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
                    ' NY BLOK BEGIN   
                    %>
                    <script>
                    InsertLink('links','<%=rs("link")%>"','<%=rs("navn")%>');
                    </script>
                    <%
                    ' NY BLOK SLUT
                    end if
                if not res.eof then
                under = 1
                response.Write "<div id=""mn" & tal & """ class=""hideit"">" & vbCrLf
                %>
                <script>
                <% do while not res.eof %>
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','<%=res("link")%>','<%=res("navn")%>');
                       
                        <!-- NY BLOK SLUT -->
                <%
                        res.movenext
                    loop
                response.Write "</script>"
                end if

                if under = 1 then
                response.Write "</div>" & vbCrLf
                end if
                rs.movenext
                tal = tal + 1
                loop
               
            %>
        </div>
    </body>
Avatar billede chrisrj Forsker
28. december 2002 - 22:05 #35
Når jeg siger "vis kilde" se det sådan ud:

....
....
....
<br>
            <br>
            <p class="mndivhdr" onClick="skiftKlasse(1,'mn1','showit','hideit','div');skiftKlasse(1,'but1','mnminus','mnplus','img')">

                    <script>
                    InsertLink('links','index.asp?page=formaal.asp"','Formål');
                    </script>
                    <p class="mndivhdr" onClick="skiftKlasse(1,'mn2','showit','hideit','div');skiftKlasse(1,'but2','mnminus','mnplus','img')">
<IMG class=billede alt='Åben undermenu' src='grafik/pil.gif'><div class=toplinks> Medlemskab</div>
<div id="mn2" class="hideit">

                <script>
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=medlemskreds.asp','Medlemskreds');
                       
                        <!-- NY BLOK SLUT -->
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=indmeldelse.asp','Indmeldelse');
                       
                        <!-- NY BLOK SLUT -->
                </script></div>
<p class="mndivhdr" onClick="skiftKlasse(1,'mn3','showit','hideit','div');skiftKlasse(1,'but3','mnminus','mnplus','img')">

                    <script>
                    InsertLink('links','index.asp?page=aktiviteter.asp"','Aktiviteter');
                    </script>
                    <p class="mndivhdr" onClick="skiftKlasse(1,'mn4','showit','hideit','div');skiftKlasse(1,'but4','mnminus','mnplus','img')">
<IMG class=billede alt='Åben undermenu' src='grafik/pil.gif'><div class=toplinks> Selskabet</div>
<div id="mn4" class="hideit">

                <script>
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=okonomi.asp','Økonomi');
                       
                        <!-- NY BLOK SLUT -->
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=aarsregnskab.asp','Årsregnskab');
                       
                        <!-- NY BLOK SLUT -->
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=sekretariat.asp','Sekretariat funktion');
                       
                        <!-- NY BLOK SLUT -->
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=statements.asp','Statements fra bestyrelsen');
                       
                        <!-- NY BLOK SLUT -->
               
                        <!-- NY BLOK BEGIN    -->
                       
                        InsertLink('sublinks','index.asp?page=bestyrelsen.asp','Bestyrelsen');
                       
                        <!-- NY BLOK SLUT -->
                </script></div>
<p class="mndivhdr" onClick="skiftKlasse(1,'mn5','showit','hideit','div');skiftKlasse(1,'but5','mnminus','mnplus','img')">
<IMG class=billede alt='Åben undermenu' src='grafik/pil.gif'><div class=toplinks> Domme og kendelser</div>
<div id="mn5" class="hideit">
....
....
....
Avatar billede miknil Nybegynder
29. december 2002 - 11:53 #36
Jeg går ud fra du har java script delen stående
i toppen af filen ?

Du må vise mig hele filen, der er sikkert tale om en javascript fejl.

Michael
Avatar billede chrisrj Forsker
29. december 2002 - 12:11 #37
Som befalet ;)

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
    <head>
       
        <link rel="stylesheet" href="css/tmenu.css" type="text/css">
            <script type="text/javascript">
<!--

function InsertLink(class,link,name){
    var HostAddr = 'http://localhost/miljoselskab/www/';
    if (document.location.href == (HostAddr+link) )
        document.write('<img src="grafik/pil.gif">');
    document.write('<a class='+class+' href="'+link+'">'+name+'</a>');       
}



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];}}}}
}
//-->
            </script>
    </head>
    <body onLoad="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnbutblank','mnplus','img');skiftKlasse(0,'none','expblank','expandit','img');skiftKlasse(0,'none','expblank2','expandit2','img'); showHideLayers('HideOnloadDiv','','hide');">
        <div id="HideOnloadDiv" style="position:absolute; left:0px; top:0px; width:100%; height:100%; background-color:#ffffff; visibility:visible; z-index:2"></div>
        <div id="Layer1" style="position:absolute; left:25px; top:25px; width:160px; z-index:1">
            <p class="oclinks">
                <a href="java script:;" onClick="skiftKlasse(0,'none','hideit','showit','div');skiftKlasse(0,'none','mnplus','mnminus','img')">
                    <br>
                    <strong>&Aring;ben</strong></a> | <a href="java script:;" onClick="skiftKlasse(0,'none','showit','hideit','div');skiftKlasse(0,'none','mnminus','mnplus','img')">
                    <strong>Luk</strong></a>
            </p>
            <br>
            <br>
            <!-- #include file="databaseconn.asp" -->
            <%
                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
                %>   
                    <!-- NY BLOK BEGIN  -->
                   
                    <script>
                    InsertLink('links','<%=rs("link")%>"','<%=rs("navn")%>');
                    </script>
                   
                    <!-- NY BLOK SLUT  -->
                <%   
                end if
                if not res.eof then
                under = 1
                response.Write "<div id=""mn" & tal & """ class=""hideit"">" & vbCrLf
                %><!-- NY BLOK BEGIN UNDERMENU -->
                <script>
                <% do while not res.eof %>
                   
                       
                        InsertLink('sublinks','<%=res("link")%>','<%=res("navn")%>');
                       
                       
                <%
                       
                        res.movenext
                    loop
                response.Write "</script><!-- NY BLOK SLUT UNDERMENU -->"
                end if

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

Sig bare til, hvis du også vil se selve siden....
Avatar billede miknil Nybegynder
29. december 2002 - 12:12 #38
Gerne siden også
Avatar billede chrisrj Forsker
29. december 2002 - 12:16 #39
Ok.. du bad selv om det...

Kode før menuen:
<//-----VENSTRE MENU STARTER------------>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
    <head>
        <title></title>
        <link rel="stylesheet" type="text/css" href="stylesheet/style.css">
            <link rel="stylesheet" href="css/tmenu.css" type="text/css">
    </head>
    <body cellSpacing="0" cellPadding="0" bottomMargin="11.5%" topMargin="11.5%" rightMargin="1" leftmargin="55">
        <table cellSpacing="0" cellPadding="0" width="887" height="576">
            <tr>
                <td colspan="3" height="2">
                    <!-- blå streg øverst -->
                    <IMG height="2" src="grafik/blaaprik.gif" width="100%"></td>
            </tr>
            <tr>
                <td vAlign="top" width="2" bgColor="#C7D0C1">
                    <!-- blå streg yderst til venstre -->
                    <IMG height="100%" src="grafik/blaaprik.gif" width="2"></td>
                <td vAlign="top" width="576" bgColor="#C7D0C1">
                    <table style="BORDER-COLLAPSE: collapse" background="grafik/bg_menu.jpg" borderColor="#111111" cellSpacing="0" cellPadding="0" width="171" align="left">
                        <TBODY>
                            <tr>
                                <td align="left" rowspan="3" width="12" height="77">&nbsp;</td>
                            </tr>
                            <tr>
                                <td align="left" width="1" height="198">&nbsp;</td>
                                <td vAlign="top" align="left" width="170" height="198">
                                <font size="4">


...
menu
...
</font></td>
                            </tr>
                            <tr>
                                <td vAlign="bottom" align="left" width="1" height="284">&nbsp;</td>
                                <td vAlign="bottom" align="left" width="170" height="340">
                               
                                    <!------------  STARTER    search ----->
                                    <html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="../justitia.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<form action="search.asp" name="search.asp" id="search.asp" class="text">
  Indtast din s&oslash;gning her:
  <input type="text" name="q" id="txtQuery" value="" size="20" class="felt"><br>
  <div class=search> <IMG class=searchbillede height=7 alt='Åben undermenu' src='grafik/pil.gif' width=7 border=0>
  <input type="submit" name="Submit" value="Find" class="knap"></div>
</form>


<span class="text">

</span>
</body>
</html>

                                    <!------------  SLUTTER search----->
                               
                                </td>
                            </tr>
                        </TBODY>
                    </table>

       


<//-----VENSTRE MENU SLUTTER------------>

<//-----TOP MENU STARTER------------>

<table height="403" cellSpacing="0" cellPadding="0" width="100%" align="right" background="grafik/bg_strib.jpg" ID="Table1">
    <tr>
        <td align="left" colSpan="3" width="713" height="37" valign="bottom">
            <font class="overskr">Dansk Selskab for Miljøret</font>
        </td>
    </tr>
    <tr>
        <td width="100%" colSpan="3" height="9" valign="bottom">
            <!-- blå streg under logo -->
            <IMG height="1" src="grafik/blaaprik.gif" width="100%"></td>
    </tr>
    <tr>
        <td width="1" height="100%">
            <!-- blå streg ved print menu -->
            <IMG height="34" src="grafik/blaaprik.gif" width="1"></td>
        <td vAlign="top" width="100%" colSpan="2" height="3">
            <table style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" align="right" ID="Table2">
                <tr>
                    <td align="left" width="75" colSpan="2" rowSpan="2">
                        <div class="logo">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
                            &nbsp; &nbsp; &nbsp;</div>
                    </td>
                </tr>
                <tr>
                    <td vAlign="top" noWrap align="right" width="33" height="15">
                        <IMG height="12" src="grafik/printer.gif" width="16" border="0" alt="Print" align="middle" vspace="4"></td>
                    <td noWrap align="middle" width="48" height="15">
                        <A href="index.asp?page=print.asp" class="topmenu" title="Print">Print</A></td>
                    <td noWrap align="middle" width="33" height="15">
                        <A href="index.asp?page=sog.asp" class="topmenu" title="Søg">Søg</A></td>
                    <td noWrap align="middle" width="65" height="15">
                        <A href="index.asp?page=kontakt.asp" class="topmenu" title="Kontakt">Kontakt</A></td>
                    <td noWrap align="middle" width="57" height="15">
                   
                    </td>
                   
                </tr>
            </table>
        </td>
    </tr>


<//-----TOP MENU SLUTTER------------>

<tr>
    <td vAlign="top" width="100%" colSpan="3">
        <table id="TABLE2" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" width="713">
            <tr>
                <td align="left" width="1" height="28">
                    <!-- blå streg ved billedet -->
                    <IMG height="100%" src="grafik/blaaprik.gif" width=1></td>
                <td vAlign="top" width="492" height="192">
                    <table id="TABLE1" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" width="492">
                        <tr>
                            <td width="19" height="13">&nbsp;&nbsp;&nbsp;&nbsp;</td>
                            <td vAlign="top" align="middle" width="330" colSpan="2" height="194">
                                <!-- billede af bro -->
                                <IMG height=173 src="grafik/bro.gif" width=221>
                            </td>
                            <td vAlign="top" align="right" width="490">
                                <table id="AutoNumber2" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" width="98%" border="0">
                                    <tr>
                                        <td width="26"></td>
                                        <td vAlign="top" align="left" width="195" height="26">
                                            <font class="head">
                                                <A href='default.asp?page=selskab.asp'>Dansk Selskab for Miljøret</A></font></td>
                                            </font>
                                        </td>
                                        <td width="22"></td>
                                    </tr>
                                    <tr>
                                        <td width="26"></td>
                                        <td vAlign="top" width="190" height="168" class="brodtekst">
                                            Lorem ipsum dolor sit amet,
consectetur adipiscing elit,
set eiusmod tempor incidunt et
labore et dolore magna aliquam.
Ut enim ad minim veniam,
quis nostrud exerc. magna aliqua
Irure dolor in reprehend
set eiusmod tempor incidunt et
labore et dolore magna aliquam.
...
                                        </td>
                                        <td width="22"></td>
                                    </tr>
                                </table>
                            </td>
                        </tr>
                    </table>
                </td>
                <td rowspan="2" valign="top" height="447">
                    <!-- grøn streg mellem teksterne og infoen - Lodret -->
                    <IMG id=IMG1 height="98%" src="grafik/groenprik.gif" width=1 align=left></td>
            </tr>
           
            <tr>
                <td width="1" height="191">
                    <!-- blå streg ved tekst - lodret -->
                    <IMG height="100%" src="grafik/blaaprik.gif" width=1></td>
               
                <td vAlign="top" width="261">   
                    <table id="AutoNumber1" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" width="492" border="0">
                        <tr>
                            <td width="1"></td>
                            <td vAlign="top" colSpan="4" height="1">
                                <!-- grøn streg under billedet -->
                                <IMG height=1 src="grafik/groenprik.gif" width=460></td>
                        </tr>
                        <tr>
                            <td align="right" height="1" colSpan="5">&nbsp;</td>
                        </tr>
                        <tr>
                            <td width="9"></td>
                            <td vAlign="top" width="215" height="34">
                                <font class="head">
                                    <A href='index.asp?page=domme.asp&id=2'>Vigtig Dom</A></font><br>Dato: 05-12-2002</td>
                                </font>
                            <td vAlign="top" align="left" width="30">
                                <!-- grøn streg mellem overskrifterne nedenfor -->
                                <IMG height="100%" src="grafik/groenprik.gif" width=1></td>
                            <td vAlign="top" width="209">
                                <font class="head">
                                    <A href='default.asp?page=selskab.asp'>Aktiviteter i Dansk Selskab for Miljøret</A></font></td>
                                </font>
                            </td>
                            <td width="8"></td>
                        </tr>
                        <TR>
                            <td width="9">&nbsp;&nbsp;&nbsp;&nbsp;</td>
                            <TD vAlign="top" width="209" class="brodtekst" height="168">
                                Lorem ipsum dolor sit amet,
consectetur adipiscing elit, set ei
usmod tempor incidunt etlabore
et dolore magna aliquam.
Ut enim ad minim veniam, quis no
strud exerc. Irure dolor in repreh
end incididunt ut labore et dolore
magna aliqua.
Ut enim ad minim veniam.
Ut enim ad minim veniam, quis no
strud exerc. Irure dolor in repreh...
                            </TD>
                            <td vAlign="top" align="left" width="19" height="150" rowspan="2">
                                <!-- grøn streg mellem teksten nedenfor -->
                                <IMG height="180" src="grafik/groenprik.gif" width=1></td>
                            <TD vAlign="top" width="209" height="168" class="brodtekst">
                                Lorem ipsum dolor sit amet,
consectetur adipiscing elit,
set eiusmod tempor incidunt et
labore et dolore magna aliquam.
Ut enim ad minim veniam,
quis nostrud exerc.
Irure dolor in reprehend
incididunt ut labore et dolore
magna aliqua.
Ut enim ad minim veniam.
                            </TD>
                            <td width="8"></td>
                        </TR>
                       
                        <tr>
                            <td colspan="4" height="29">&nbsp;
                            </td>
                        </tr>
                    </table>
                </td>
                <td vAlign="top" align="right" width="453" colSpan="2" rowspan="2" height="191">
                   
                    <TABLE id="AutoNumber4" style="BORDER-COLLAPSE: collapse" borderColor="#111111" cellSpacing="0" cellPadding="0" border="0">
                        <TR>
                            <TD align="right" width="100%">
                                <div class="cirkel">
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                               
                                <div class="Sekratariatstekst">
                                Sekretariat&nbsp;
                                <br>
                                Bech-Bruun Dragsted&nbsp;
                                <br>
                                advokatfirma&nbsp;
                                <br>
                                Langelinie Allé 35&nbsp;
                                <br>
                                2100 København Ø&nbsp;
                                <br>
                                Telefon 00 00 00 00&nbsp;
                                <br>
                                Telefax 00 00 00 00&nbsp;
                                <br>
                                miljo@bechbruundragsted.com&nbsp;
                                </div>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                <br>
                                </div>
                            </TD>
                        </TR>
                    </TABLE>
                </td>
            </tr>


<//-----BUND MENU STARTER------------>

<tr>
                    <td vAlign="top" align="left" width="400" colSpan="4" height="1">
                        <table id="AutoNumber3" style="BORDER-COLLAPSE: collapse;" borderColor="#111111" height="45" cellSpacing="0" cellPadding="0" width="712" border="0">
                            <tr>
                                <td width="100%" colSpan="5" height="1" valign="bottom">
                                    <!-- blå streg over bund tekst -->
                                    <IMG height=1 src="grafik/blaaprik.gif" width="100%"></td>
                            </tr>
                           
                            <tr class="bundtekst">
                                <td width="60" height="29"></td>
                                <td class="bundtekst" align="left" width="90" height="29">
                                    København</td>
                                <td align="left" width="165" height="29">
                                    Mandag den 28-12-2002</td>
                                <td align="left" width="91" height="29">
                                    Kl. 16:50</td>
                                <td align="left" width="190" height="29">
                                    </td>
                            </tr>
                           
                            <tr>
                                <td vAlign="bottom" width="100%" colSpan="6" height="1">
                                    <!-- blå streg under bund tekst (vandret) -->
                                    <IMG height=1 src="grafik/blaaprik.gif" width=100%></td>
                            </tr>
                            <tr>
                                <td width="14" height="1" align="left" colSpan="6">
                                    <!-- blå streg under bund tekst (lodret) -->
                                    <IMG height=14 src="grafik/blaaprik.gif" width=1></td>
                            </tr>
                        </table>
                    </td>
                </tr>
            </TABLE>
        </TD>
    </TR>
</TABLE>
</TD>
<td height="346"><IMG height="100%" src="grafik/blaaprik.gif" width=2></td>
</TR><tr>
    <td colspan="3" height="2"><IMG height=2 src="grafik/blaaprik.gif" width="100%"></td>
</tr>
</TABLE>
</BODY>
</HTML>


<//-----BUND MENU SLUTTER------------>
Avatar billede miknil Nybegynder
29. december 2002 - 12:17 #40
To ting:

I InsertLink javascript funktionen: Udskift class med fx. css_class, class er et  java keyword

function InsertLink(css_class,link,name){
    var HostAddr = 'http://localhost/miljoselskab/www/';
    if (document.location.href == (HostAddr+link) )
        document.write('<img src="grafik/pil.gif">');
    document.write('<a class='+css_class+' href="'+link+'">'+name+'</a>');       

I det ene kald til InsertLink har der sneget sig en extra " ind efter
<%=rs("link")%>
InsertLink('links','<%=rs("link")%>"','<%=rs("navn")%>');

Den bør du nok også fjerne

Mik
I
}
Avatar billede miknil Nybegynder
29. december 2002 - 12:22 #41
Hmmmmm.

Var det den generede rigtige side jeg fik der ? Der er hverken javascript eller menu på den.

Evt mail den til michael.nielsen@trustme.dk
Avatar billede miknil Nybegynder
29. december 2002 - 12:25 #42
Desuden har du 2 head og body blokke på den generede side, IE ignorer det men andre browsere er ikke ligeså fejltolerante.

Michael
Avatar billede chrisrj Forsker
29. december 2002 - 12:26 #43
Siden er ikke færdig endnu. :)

Jeg sidder liige med noget andet. Er det i orden hvis jeg vender tilbage senere?
Avatar billede miknil Nybegynder
29. december 2002 - 12:31 #44
Det er fint nok!

Det er ligemeget med at maile mig den færdige side, jeg kunne selv stykke det sammen udfra dine kommentarer.

Umiddelbart ser det ud som om udskiftningen af class med css_class skulle kunne løse det, det er den eneste åbenlyse javascript fejl jeg lige kan spotte - min fejl beklager.

Michael
Avatar billede chrisrj Forsker
29. december 2002 - 12:36 #45
lyder godt. :)
Avatar billede chrisrj Forsker
31. december 2002 - 15:35 #46
Hej igen

Nu har jeg testet det og der kommer ingen fejl.
Men den viser ikke mit billede, dog rykker den menu punktet lidt længere ned!?!?

Og ændre jeg stien til noget forkert, forsvinder menupunktet helt!??!
Avatar billede chrisrj Forsker
31. december 2002 - 15:38 #47
Det bliver dog vist hvis det drejer sig om et undermenu punkt. Her ståer den bare 400 km ude til siden. :(
Avatar billede miknil Nybegynder
01. januar 2003 - 11:06 #48
Som jeg skrev tidligere så er der en extra " i det ene kald

I det ene kald til InsertLink har der sneget sig en extra " ind efter
<%=rs("link")%>
InsertLink('links','<%=rs("link")%>"','<%=rs("navn")%>');

Omkring 400 Km ude til siden så er det html relateret, det har intet med javascript delen at gøre - muligvis du bliver nød til at putte det hele ind i en tabel for at styre det.

Michael
Avatar billede chrisrj Forsker
01. januar 2003 - 12:23 #49
Min linie ser sådan ud:

InsertLink('links','<%=rs("link")%>','<%=rs("navn")%>');

så det er ikke det der er problemet...
Avatar billede miknil Nybegynder
01. januar 2003 - 12:34 #50
Du må poste den generede side hvis jeg skal kunne hjælpe dig, evt mail den til
michael.nielsen@trustme.dk
Avatar billede chrisrj Forsker
01. januar 2003 - 12:36 #51
jeg mailer den...
Avatar billede chrisrj Forsker
01. januar 2003 - 12:40 #52
... er sendt
Avatar billede cdc Novice
01. januar 2003 - 12:42 #53
kan en menu som denne bruges: http://www.cdcmedia.dk/cement/
er lavet på en testside, menuen er css men den lille gif i
Avatar billede chrisrj Forsker
01. januar 2003 - 12:45 #54
Nej, den viser jo ikke det aktive menu punkt når man klikker væk.
Avatar billede miknil Nybegynder
01. januar 2003 - 12:57 #55
Nu hvor jeg sådan for alvor får kigget på din kode undrer det mig su ønsker at kode den ønskede funktionalitet i javascript - hvorfor ikke istedet kode det i ASP ? Du poster jo et request hvergang der klikkes på et link!

Og ville du i givet fald foretrække en ASP løsning ?

Michael
Avatar billede chrisrj Forsker
01. januar 2003 - 13:06 #56
Ja!!!! :)

Jeg har bare fået denne menu af en ven som havde fundet den på nettet...

Grunden til at jeg ikke bare selv har lavet den, er at jeg dels ikke har tid, dels ikke er SÅ stærk i asp. :)

Så hvis du, eller en anden, vil lave en i asp nu, ville jeg gerne give flere points!!!

Kravet er bare at den skal så ud på samme måde og virke på samme måde, set fra brugerens side.

Det vil bl.a. sige at siden IKKE skal genindlæses hver gang man klikker på et menupunkt.
Og nej, frames er ikke en mulighed.

Hvis der er nogen der kan lave det, ville jeg blive MEGET glad! :D
Avatar billede miknil Nybegynder
01. januar 2003 - 13:12 #57
Jeg ville bruge den samme funktionalitet som i Javascript delen!
Jeg kigger på det og vender tilbage senere.

Michael
Avatar billede chrisrj Forsker
01. januar 2003 - 13:15 #58
Lyder dejligt!!

Endnu gang venter jeg i spænding. ;)
Avatar billede miknil Nybegynder
01. januar 2003 - 13:33 #59
Mellem </script> og </head> i toppen af din asp fil, indsæt denne funktion

<%
sub insert_link(css_class, link, name)
dim aPageName
dim aUrl
aUrl = Request.ServerVariables("url") ' get the url (index.asp)
aQueryParams = Request.QueryString ' get the querystring (page=*.asp)
if ( (aUrl & aQueryParams) == link)
    Response.Write("<img src=grafik/pil.gif")
endif
Response.Write("<a href=" & link & " class=" & css_class & ">" & name & "</a>")

end sub
%>


I koden hvor du før kaldte javascript funktionen, skal du nu istedet kalde asp funktionen


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
  insert_link "links",rs("link"), rs("navn")  ' ny linie.

og det samme for sublinks.

<% do while not res.eof
insert_link "sublinks",rs("link"), rs("navn")
res.movenext
loop


Jeg har ingen mulighed for at teste ASP'en på min egen PC da jeg i øjeblikket kører Tomcat - så syntax fejlene må vi tage som de kommer.

Jeg har mailet dig hele asp filen med de nye ændringer.

Michael
Avatar billede miknil Nybegynder
01. januar 2003 - 13:35 #60
Der var allerede en fejl:
- dim aPageName skal ændres til dim aQueryParams
du har godt nok ikke option explicit på, men jeg foretrækker at erklære variable før jeg bruger dem.
Avatar billede miknil Nybegynder
01. januar 2003 - 13:36 #61
og
  if ( (aUrl & aQueryParams) == link)
skal ændres til
  if ( (aUrl & aQueryParams) = link)

det er jo ikke java eller c :-)
Avatar billede miknil Nybegynder
01. januar 2003 - 13:39 #62
Naturligvis er det også nødvendigt af afslutte <img tag'et
Response.Write("<img src=grafik/pil.gif")

skal ændres til Response.Write "<img src=grafik/pil.gif>"

jeg beklager, men mit ASP er rimeligt rustent.

michael
Avatar billede chrisrj Forsker
01. januar 2003 - 13:41 #63
:)

Jeg kigger lige på det...
Avatar billede chrisrj Forsker
01. januar 2003 - 13:46 #64
Det virker ikke.

Den siger "siden kan ikke vises"
Avatar billede cdc Novice
01. januar 2003 - 13:48 #65
det er også denne menu: http://peterelkjaer.dk/exp/skiftklasse.html
Avatar billede chrisrj Forsker
01. januar 2003 - 13:50 #66
det er den jeg bruger
Avatar billede miknil Nybegynder
01. januar 2003 - 13:52 #67
Får du nogle ASP fejl ?, prøv lige at maile mig asp siden så kigger jeg på det

Jeg ser lige om jeg kan finde IIS'en så kan jeg teste det her, det andet her spiller nok ikke :-)

Michael
Avatar billede miknil Nybegynder
01. januar 2003 - 14:05 #68
Prøv at ændre linien 

insert_link ("sublinks",rs("link"), rs("navn"))

til

insert_link ("sublinks",res("link"), res("navn"))
Avatar billede miknil Nybegynder
01. januar 2003 - 14:06 #69
og fjern linien

response.Write "</script><!-- NY BLOK SLUT UNDERMENU -->"

efter submenu linket.
Avatar billede chrisrj Forsker
01. januar 2003 - 14:09 #70
ingen ændring....
Avatar billede miknil Nybegynder
01. januar 2003 - 14:16 #71
endif
skal ændres til
end if
Avatar billede chrisrj Forsker
01. januar 2003 - 14:18 #72
samme...
Avatar billede chrisrj Forsker
01. januar 2003 - 14:21 #73
selvom jeg udkommentere al din kode, vil den stadig ikke vise siden.
Avatar billede chrisrj Forsker
01. januar 2003 - 14:24 #74
Min IIS er gået ned. Jeg prøver lige at genstarte...
Avatar billede miknil Nybegynder
01. januar 2003 - 14:25 #75
IIS'en kommer ikke til at spille her, jag har VS.Net installeret og derefter reinstalleret IIS'en det betyder jeg skal reinstallere win2k for at få det til at du - og det magter jeg ikke !

Men for at fortsætte så mangler der et then i linien

if ( (aUrl & aQueryParams) = link)

skal være

if ( (aUrl & aQueryParams) = link) then
Avatar billede chrisrj Forsker
01. januar 2003 - 14:32 #76
ja, det fandt jeg også ud af.

Nu bliver siden vist, men billedet kommer ikke på.
Avatar billede miknil Nybegynder
01. januar 2003 - 14:34 #77
Prøv at ændre
(aUrl & aQueryParams)

til

(aUrl & "?" & aQueryParams)

Michael
Avatar billede chrisrj Forsker
01. januar 2003 - 14:35 #78
samme.

Min url ser sådan ud: http://localhost/miljoselskab/www/index.asp?page=formaal.asp
Avatar billede miknil Nybegynder
01. januar 2003 - 14:39 #79
Det kan være jeg husker helt forkert, muligvis ServerVariables("url") er inklusiv get parametre

Prøv at skriv urlen ud:

Tilføj

Response.Write "url=" & aUrl & "<BR>"
Response.Write "aQueryParams=" & aQueryParams& "<BR>"

Det printer variablene ud på din side, prøv at vise mig resultatet af disse.

Michael
Avatar billede miknil Nybegynder
01. januar 2003 - 14:39 #80
Bare smid linierne ind lige før

end sub
Avatar billede chrisrj Forsker
01. januar 2003 - 14:42 #81
url=/miljoselskab/www/index.asp<BR>
aQueryParams=page=aktiviteter.asp<BR>

Den kommer 5 steder og der står det samme alle gange.
Avatar billede chrisrj Forsker
01. januar 2003 - 14:43 #82
sorry. Det står alle steder. ikke kun 5.
Avatar billede miknil Nybegynder
01. januar 2003 - 14:48 #83
Godt nok, så skal linien

if ( (aUrl & "?" & aQueryParams) = link) then

ændres til

if ( (aUrl & "?" & aQueryParams) = ("/miljoselskab/www/" & link) ) then   

Forhåbentlig det virker.

(Er det der her de kalder for remote debugging ? )

Mik
Avatar billede miknil Nybegynder
01. januar 2003 - 14:49 #84
Og bare fjern linierne

Response.Write "url=" & aUrl & "<BR>"
Response.Write "aQueryParams=" & aQueryParams& "<BR>"

igen
Avatar billede chrisrj Forsker
01. januar 2003 - 14:54 #85
heh, så er vi tilbage til mine sidste kommentarer fra igår:

Kommentar: chrisrj
31/12-2002 15:35:08    Hej igen

Nu har jeg testet det og der kommer ingen fejl.
Men den viser ikke mit billede, dog rykker den menu punktet lidt længere ned!?!?

Og ændre jeg stien til noget forkert, forsvinder menupunktet helt!??!
 

 
Kommentar: chrisrj
31/12-2002 15:38:34    Det bliver dog vist hvis det drejer sig om et undermenu punkt. Her ståer den bare 400 km ude til siden. :(
Avatar billede miknil Nybegynder
01. januar 2003 - 14:58 #86
Kanon :-)

Prøv så lige at maile mig asp siden og den generede side, + evt dit stylesheet og billedet grafik/pil.gif

Michael
Avatar billede miknil Nybegynder
01. januar 2003 - 20:43 #87
Dine problemer skyldes (tildels) dit stylesheet,
prøv at lave ASP funktionen om til nedenstående

<%
sub insert_link(css_class, link, name)
dim aQueryParams
dim aUrl

aUrl = Request.ServerVariables("url") ' get the url (index.asp)
aQueryParams = Request.QueryString ' get the querystring (page=*.asp)

Response.Write("<a href=" & link & " class=" & css_class & ">")
if ( (aUrl & "?" & aQueryParams) = ("/miljoselskab/www/" & link)) then
Response.Write("<img src=grafik/pil.gif>")
end if
Response.Write(name & "</a>")
end sub
%>


Det betyder at billedet bliver en del af dit link, derfor får du brugt samme
style til billedet som til linket.
Avatar billede chrisrj Forsker
01. januar 2003 - 21:03 #88
Stort!!!

Dagens mand i skysovs!!!

Pointsne er velfortjente!!!! :D
Avatar billede miknil Nybegynder
01. januar 2003 - 21:12 #89
Tak ska du fik, videre held og lykke med projektet

Jeg kan virkelig godt lide dit design :-)

Mvh Michael
Avatar billede chrisrj Forsker
01. januar 2003 - 21:20 #90
Tak og godt nytår, selv om det er lidt sent for den slags. :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Webudvikling kurser
Vi tilbyder markedets bedste kurser inden for webudvikling
Se alle Webudvikling kurser

Flere spørgsmål fra JavaScript kategorien

Titel Indlæg Oprettet Seneste aktivitet
problem med download i <a href=" " download> tag i JavaScript Af Peer i JavaScript 5 27/04/202620:09 21/08/202610:41
Validering af filnavn i formular Af Strawberry i JavaScript 8 14/04/202610:11 20/04/202611:14
Mangler et JavaScript til htm side med iframe i Joomla5 Af Peder Lund Nielsen i JavaScript 2 03/02/202614:19 04/04/202616:02
Åbne en PDF fil fra en mappe Af mbl i JavaScript 9 18/04/202516:52 22/04/202512:33
Spørgsmål til cookies Af Mads i JavaScript 2 14/02/202511:47 27/06/202514:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
IT-JOB
Seneste spørgsmål Seneste aktivitet
I dag 13:06 Kan ikke starte min pc Af Malm i PC
I går 19:20 DVD program Af dcedata1977 i Andet software
I går 16:09 Bitdefender brokker sig Af FinnRasmussen i Andet sikkerhed
06/0921:00 Libre Office Impress Af Frank i Andre styresystemer
06/0911:47 VB script Af Jenshentze i Word
White papers
Flere white papers »