Avatar billede jonmh Nybegynder
01. marts 2005 - 16:57 Der er 4 kommentarer og
1 løsning

Fejl i script?

på hjemmesiden, http://www.marstalsejlklub.dk/, har jeg oprettet et news script og det virker fint, men når jeg klikker på en nyhed og så går tilbage (ved enten at bruge tilbageknappen eller linket) laver den mellemrum mellem nyhederne. håber der er nogle der kan se hvad der er galt på forhånd tak.

Kildekode:

<%@ Language=VBScript%>
<% mode = request("mode") %><% if mode = "" then %>

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>

    <!-- #BeginTemplate "index.htt" -->

        <head>
            <meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
            <meta name="generator" content="Adobe GoLive 6">
            <title>Marstal Sejlklub</title>
            <link href="style.css" rel="stylesheet" media="screen">
            <SCRIPT type=text/javascript src="menu.js"></SCRIPT>
            <!-- #BeginHeadLocked "" -->
                <link href="style.css" rel="stylesheet" media="screen">
                <SCRIPT type=text/javascript src="menu.js"></SCRIPT>
            <!-- #EndHeadLocked -->
        </head>

        <body bgcolor="#0d004c" onload="visMenu('menu1',true)">
            <table width="790" border="0" cellspacing="0" cellpadding="0">
                <tr>
                    <td colspan="3"><img src="top6.jpg" alt="" height="225" width="790" border="0"></td>
                </tr>
                <tr>
                    <td align="center" valign="top" width="241">
                        <table class="border" width="241" border="0" cellspacing="0" cellpadding="0" height="450">
                            <tr>
                                <td rowspan="3" width="10"></td>
                                <td rowspan="3" colspan="2" align="left" valign="top">
                                    <DIV id=leftcol>
                                        <DIV id=mainMenu>
                                            <UL id=menuList>
                                                <LI class=menubar><A href="index.html">Startsiden</A>
                                                <UL class=menu id=menu1>
                                                    <LI><A href="aftenkap.html">Aftenkapsejlads</A>
                                                    <LI><A href="kontakt.html">Kontakt</A>
                                                </UL>
                                                </LI>
                                                <LI class=menubar><A href="java script:visMenu('menu2',true)">Ungdomsafdelingen</A>
                                                <UL class=menu id=menu2>
                                                    <LI><A href="optimist.html">Optimister</A>
                                                    <LI><A href="pirat.html">Piratjoller</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="java script:visMenu('menu3',true)">Udvalg</A>
                                                <UL class=menu id=menu3>
                                                    <LI><A href="optimistudv.html">Optimistudvalg</A>
                                                    <LI><A href="sejladsudv.html">Sejladsudvalg</A>
                                                    <LI><A href="juniorudv.html">Juniorudvalg</A>
                                                    <LI><A href="roudv.html">Roudvalg</A>
                                                    <LI><A href="klubhusudv.html">Klubhusudvalg</A>
                                                    <LI><A href="festudv.html">Festudvalg</A>
                                                    <LI><A href="pladsudv.html">Kran/plads udvalg</A>
                                                    <LI><A href="haveudv.html">Haveudvalg</A>
                                                    <LI><A href="klubmaal.html">Klubmåler</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="ballonindex.asp">Ballonen</A>
                                                <UL class=menu id=menu4>
                                                        <LI><A href="ballonen/ballonarkiv.html">Arkiv</A>
                                                </UL>
                                                <LI class=menubar><A href="besty.html">Bestyrelsen</A></LI>
                                                <LI class=menubar><A href="java script:visMenu('menu5',true)">Arrangementer</A>
                                                <UL class=menu id=menu5>
                                                    <LI><A href="kalender.asp">Kalender</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="java script:visMenu('menu6',true)">Billeder</A>
                                                <UL class=menu id=menu6>
                                                    <LI><A href="billeder/soeg.html">Søg</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="kisten.html">Skibskisten</A>
                                                <UL class=menu id=menu7>
                                                    <LI><A href="skibskisten/annoncer.html">Annoncer</A>
                                                    <LI><A href="skibskisten/tilfoej.html">Tilføj annonce</A>
                                                    <LI><A href="skibskisten/soeg.html">Søg</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="java script:visMenu('menu8',true)">Roafdelingen</A>
                                                <UL class=menu id=menu8>
                                                    </LI>
                                                </UL>
                                                <LI class=menubar><A href="java script:visMenu('menu9',true)">Turberetning</A>
                                                <UL class=menu id=menu9>
                                                    <LI><A href="turberet/soeg.html">Søg</A></LI>
                                                </UL>
                                                <LI class=menubar><A href="sitemap.html">Sitemap</A></LI>
                                                </LI>
                                            </UL>
                                        </DIV>
                                    </DIV>
                                </td>
                            </tr>
                            <tr>
                           
                        </tr>
                            <tr>
                           
                        </tr>
                        </table>
                    </td>
                    <td colspan="2" align="left" valign="top"><!-- #BeginEditable "Region" -->
                            <table class="border2" width="549" border="0" cellspacing="0" cellpadding="0" height="450">
                                <tr>
                                    <td rowspan="3" width="10"></td>
                                    <td rowspan="3" colspan="2" align="center" valign="top">
                                    <table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
                                            <tr>
                                                <td rowspan="3" valign="top"><span class="eyecatch">OBS!</span>
                                                    <div align="left">
                                                        <p><span class="eyecatchsmall">Husk klubaften d. 10/3 med foredrag af Dorte O. Jensen</span></p>
                                                    </div>
                                                    <div align="center">
                                                        <p><img src="dorteo.jpg" alt="" width="169" height="151" border="1"></p>
                                                    </div>
                                                </td>
                                                <td rowspan="3" width="20"></td>
                                                <td rowspan="3" valign="top" width="30%">
                                                    <p></p>
                                                    <table class="nyesteartikler" width="90%" border="0" cellspacing="0" cellpadding="0">
                                                        <tr>
                                                            <td colspan="3" align="center" valign="middle" bgcolor="#308ccb"><span class="titeltext">OBS!</span></td>
                                                        </tr>
                                                        <%                                                             Set Conn = Server.CreateObject("ADODB.Connection")
                                                            Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("db/database.mdb")
                                                            strSQL = "select top 5 * from obs ORDER BY id DESC"
                                                            set rs = Conn.execute(strSQL)

                                                            if rs.EOF then
                                                            Response.write "<font face=""Arial"" size=""2"">Databasen er tom.</font>"
                                                            else
                                                            Do Until rs.EOF
                                                            %>
                                                        <tr height="15">
                                                            <td colspan="3" height="5"></td>
                                                        </tr>
                                                        <tr>
                                                            <td width="10"></td>
                                                            <td colspan="2" align="left" valign="middle"><a href='obs.asp?id=<%=RS("id")%>' target="_top"><%=RS("overskrift")%></a></td>
                                                            <%RS.MoveNext
                                                            Loop
                                                            end if

                                                            Conn.Close
                                                            Set Conn = Nothing%></tr>
                                                    </table>
                                                    <p></p>
                                                    <table class="nyesteartikler" width="90%" border="0" cellspacing="0" cellpadding="0">
                                                        <tr>
                                                            <td colspan="3" align="center" valign="middle" bgcolor="#308ccb"><span class="titeltext"> 3 Nyeste artikler</span></td>
                                                        </tr>
                                                        <%
                                                            Set Conn = Server.CreateObject("ADODB.Connection")
                                                            Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("db/database.mdb")
                                                            strSQL = "select top 3 * from nyheder ORDER BY id DESC"
                                                            set rs = Conn.execute(strSQL)

                                                            if rs.EOF then
                                                            Response.write "<font face=""Arial"" size=""2"">Databasen er tom.</font>"
                                                            else
                                                            Do Until rs.EOF
                                                            %>
                                                        <tr height="15">
                                                            <td colspan="3" height="5"></td>
                                                        </tr>
                                                        <tr>
                                                            <td width="10"></td>
                                                            <td colspan="2" align="left" valign="middle"><A HREF="nyhed.asp?id=<%=RS("id")%>" TARGET="_top"><%=RS("overskrift")%></A></td>
                                                            <%RS.MoveNext
                                                            Loop
                                                            end if

                                                            Conn.Close
                                                            Set Conn = Nothing%></tr>
                                                    </table>
                                                    <p></p>
                                                </td>
                                            </tr>
                                            <tr>
                                               
                                            </tr>
                                            <tr>
                                               
                                            </tr>
                                        </table>   
                                    </td>
                                </tr>
                                <tr></tr>
                                <tr></tr>
                            </table>
                        <!-- #EndEditable --></td>
                </tr>
                <tr>
                    <td width="241"></td>
                    <td width="550"></td>
                    <td></td>
                </tr>
            </table>
            <p></p>
        </body>

    <!-- #EndTemplate -->

</html>


<% end if %>
Avatar billede busschou Praktikant
01. marts 2005 - 17:18 #1
Jeg ved ikke om det hjælper men det ser for mig ud som om du ikke får afsluttet dine table rows i begge dine løkker:
-------------------------------------
Do Until rs.EOF
                                                            %>
                                                        <tr height="15">
                                                            <td colspan="3" height="5"></td>
                                                        </tr>
                                                        <tr>
                                                            <td width="10"></td>
                                                            <td colspan="2" align="left" valign="middle"><a href='obs.asp?id=<%=RS("id")%>' target="_top"><%=RS("overskrift")%></a></td>
                                                        </tr>
                                                            <%RS.MoveNext
--------------------------------------------------
Avatar billede busschou Praktikant
01. marts 2005 - 17:18 #2
Altså bare en "</tr>" før hver dine RS.MoveNext
Avatar billede jonmh Nybegynder
01. marts 2005 - 17:25 #3
de var afsluttet efter RS.MoveNext, men prøvede så at afslutte dem før. Ser ikke ud til at have nogen virkning
Avatar billede moejensen Nybegynder
10. marts 2005 - 16:09 #4
har du fået rettet fejlen, for jeg får ikke dobbelt linieafstand når jeg klikker tilbage efter at have kigget på en nyhed.
Avatar billede jonmh Nybegynder
10. marts 2005 - 18:30 #5
hmm tja ser da ud til at det virker. Skal ærlig indrømme at jeg ingen ide har om hvordan det er gået til hehe... men vil da hermed lukke ned for spørgsmålet. Mange tak for forsøget fra busschou
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester