Søg
Avatar billede forskningsforum Nybegynder
10. maj 2001 - 17:49 Der er 13 kommentarer og
1 løsning

Hjælp til optimering af ASP sider - Hvad gør jeg galt?

Hej min forside er ufattelig lang tid om at loade (iflg. frontPage 13sek ved 56) www.forskningsforum.dk/forside.asp Hvad skyldes dette? Gode råd udbedes, da alle mine sider generelt er lang tid om at loade.
Jeg kører med access database. Skyldes loadtiden:
1. At jeg laver siderne i FP.
2. Kører Access i stedet for SQL
3. Min html kode
4. At jeg benytter include filer
5. Andet

Hvis nogen vil påtage sig at \"rense\" forsiden (optimerer) for at jeg kan se forskellen, smider jeg gerne nogle point i - og jeg attacher gerne scriptet..

Jeg tillader mig at paste scriptet her:

<%@ LANGUAGE=\"VBSCRIPT\" %>
<% Option Explicit
%>
<!-- #INCLUDE VIRTUAL=\"/adovbs.inc\" -->
<%
dim link, conn, RS, sql
Set conn = Server.CreateObject(\"ADODB.Connection\")
Set RS = Server.CreateObject(\"ADODB.Recordset\")

sub hent_link(link)
    conn.Open Application(\"database\")
    RS.Open  \"SELECT * FROM TLink WHERE LinkType=\'\"& link &\"\'\", conn

    while not RS.EOF
        response.write \"<a href=\"\"java script:AabenLink(\'\"
        response.write  RS(\"URL\")
        response.write \"\')\"\">\"
        response.write RS(\"Beskrivelse\")
        response.write \"</a><br>\"
        RS.MoveNext
    Wend

    RS.Close
    conn.close
end sub
   
Dim streng, SvarStatus

\' Henter antal åbne og lukkede spg.
sub hent_total(SvarStatus)
    Conn.Open Application(\"Database\")

    Select case SvarStatus
        case FALSE
            RS.Open \"SELECT Svar_ID FROM TSvar WHERE SvarStatus=FALSE AND SvarTil=0\", Conn
            Response.write RS.RecordCount
        case TRUE
            RS.Open \"SELECT Svar_ID FROM TSvar WHERE SvarStatus=TRUE  AND SvarTil=0\", Conn
            Response.write RS.RecordCount
    end select

    RS.Close
    Conn.Close
end sub


\' henter nyeste opgaver
sub nyesteOpg(opgaver)

    Dim Tittel
    Conn.Open Application(\"fildb\")
   
    Select case opgaver
    case \"opg\"
        sql = \"SELECT TOP 5 ID, Tittel FROM TFiles ORDER BY ID DESC\"
        \'RS.Open \"SELECT ID, Tittel FROM TFiles\", Conn
    end select
   
    if( LEN(sql) > 0) then
        Set RS = Conn.Execute( sql )
        While NOT RS.EOF
            Response.write \"<img border=\"\"0\"\" src=\"\"/billeder/logo/download.gif\"\">&nbsp;\"
            Tittel=LEFT(RS(\"Tittel\"),28)
            Tittel=LEFT(Tittel,INSTRREV(Tittel,\"\")) &\"...\"
            Response.write \"<a href=\"\"/Upload/downloadDB.asp?ID=\"& RS(\"ID\") &\"\"\">\"& Tittel
            Response.write \"</a><br>\"
            RS.MoveNext
        Wend
    RS.Close
    conn.Close
    End if
    sql = \"\"
end sub

\' henter nyeste debatindlaeg
sub nyestedebat(debat)

    Dim R_Message
    Conn.Open Application(\"database\")
   
    Select case debat
    case \"deb\"
        sql = \"SELECT TOP 5 Reply_ID, R_Message, topic_ID FROM Reply ORDER BY Reply_ID DESC\"
        \'RS.Open \"SELECT Reply_ID, R_Message, topic_ID FROM Reply\", Conn
    end select
   
    if( LEN(sql) > 0) then
        Set RS = Conn.Execute( sql )
        While NOT RS.EOF
            Response.write \"<img border=\"\"0\"\" src=\"\"/billeder/logo/faq.gif\"\">&nbsp;\"
            R_Message=LEFT(RS(\"R_Message\"),28)
            R_Message=LEFT(R_Message,INSTRREV(R_Message,\"\")) &\"...\"
            Response.write \"<a href=\"\"/Forum2/topic.asp?topic_id=\"& RS(\"topic_ID\") &\"\"\">\"& R_Message
            Response.write \"</a><br>\"
            RS.MoveNext
        Wend
    RS.Close
    conn.Close
    End if
    sql = \"\"
end sub

\' henter nyeste annonce
sub nyesteannonce(annonce)

    Dim cTitle
    Conn.Open Application(\"database\")
   
    Select case annonce
    case \"ann\"
        sql = \"SELECT TOP 5 cTitle, nAdID FROM tblAds ORDER BY nAdID DESC\"
        \'RS.Open \"SELECT cTitle, nAdID FROM tblAds\", Conn
    end select
   
    if( LEN(sql) > 0) then
        Set RS = Conn.Execute( sql )
        While NOT RS.EOF
            Response.write \"<img border=\"\"0\"\" src=\"\"/billeder/logo/calendar.gif\"\">&nbsp;\"
            cTitle=LEFT(RS(\"cTitle\"),28)
            cTitle=LEFT(cTitle,INSTRREV(cTitle,\"\")) &\"...\"
            Response.write \"<a href=\"\"/bazar_dk/details.asp?nAdID=\"& RS(\"nAdID\") &\"\"\">\"& cTitle
            Response.write \"</a><br>\"
            RS.MoveNext
        Wend
    RS.Close
    conn.Close
    End if
    sql = \"\"
end sub

%>

<script type=\"text/javascript\">
<!--
    function AabenLink(URL)
    {
        NytVind = window.open(URL, \"NytVind\", \"toolbar=yes,status=no,resizable=yes,scrollbars=yes,width=400,height=300\")
    }
// -->
</script>

<head>

<LINK href=\"/main.css\" rel=\"stylesheet\" type=\"text/css\">
<title>[ .. ForskningsForum .. Den Akademiske Portal .. ]</title>
<style fprolloverstyle>A:hover {color: #FF0000}
</style>
</head>
<!-- #INCLUDE VIRTUAL=\"/inc/headerforside.asp\" -->
<body bgcolor=\"#18949C\" leftmargin=\"0\" link=\"#003F5C\" vlink=\"#003F5C\" alink=\"#003F5C\">

<table border=\"0\" width=\"516\" height=\"100%\">
<tr>
<td width=\"115\" valign=\"top\" align=\"middle\" height=\"100%\">
<!-- #INCLUDE VIRTUAL=\"/inc/leftmenu.asp\" -->

</td>

<td bgcolor=\"#FFFFFF\" width=\"642\" valign=\"top\" height=\"100%\">
<!-- Her er det reele indhold af siden. -->

<!-- Billeder i toppen af siden -->

    <table border=\"0\" width=\"629\" cellpadding=\"0\" cellspacing=\"0\" height=\"85\">
    <tr><td valign=\"bottom\" width=\"168\" height=\"14\">
      </td>
    <td valign=\"bottom\" align=\"center\" width=\"300\" height=\"14\">
      </td>
    <td  valign=\"bottom\" width=\"155\" height=\"14\">
      </td>
    </tr>
    <tr><td valign=\"bottom\" rowspan=\"2\" width=\"168\" height=\"71\">
        <p align=\"center\"><img border=\"0\" src=\"images/wpe3DB.jpg\"></p>
      </td>
    <td valign=\"top\" align=\"center\" width=\"300\" height=\"65\">
        <p align=\"center\">
        <img border=\"0\" src=\"/billeder/logo/logo_finish.jpg\" width=\"297\" height=\"58\" ALT=\"\" align=\"top\"></p>
      </td>
    <td  valign=\"bottom\" rowspan=\"2\" width=\"155\" height=\"71\">
        <p align=\"center\"><img border=\"0\" src=\"images/wpe3DD.jpg\"></p>
      </td>
    </tr><tr>
    <td valign=\"top\" align=\"center\" width=\"300\" height=\"6\">
        <p align=\"center\">
        <img border=\"0\" src=\"/billeder/forside/daPortal.gif\" width=\"239\" height=\"21\" ALT=\"\"></p>
    </td>
    </tr>
    </table>
<!-- billeder i toppen slut -->

<table border=\"0\" width=\"650\" cellspacing=\"0\" cellpadding=\"0\" height=\"1\">
  <tr>
    <td width=\"648\" height=\"2\" bgcolor=\"#003F5C\"></td>
  </tr>
</table>
<!-- Tabel til hele \"body sektionen\" -->
    <table border=\"0\" cellspacing=\"0\" width=\"642\" cellpadding=\"0\" cellspacing=\"0\" height=\"1\">
   
</tabel>
    <tr><td width=\"117\" valign=\"top\" height=\"1\">

    <!-- venstre link side -->
        <table border=\"0\" cellspacing=\"0\" width=\"117\" height=\"601\">
        <tr align=\"center\">
        <td width=\"117\" bgcolor=\"#99CCCC\" valign=\"top\" height=\"146\">
            <p class=\"LilleOverskrift\">AVISER</p>
            <p class=\"TykLinks\">
            <%
                link = \"Avis\"
                call hent_link(link)
            %>
                        <br></p></td></tr>

        <tr align=\"center\">
        <td width=\"117\"  bgcolor=\"#FCEDB3\" height=\"141\" valign=\"top\">
            <p class=\"LilleOverskrift\">ANDRE TIDSSKRIFER</p>
            <p class=\"TykLinks\">
            <%
                link = \"Tids\"
                call hent_link(link)
            %>
            </p>
        </td></tr>

        <tr align=\"center\">
        <td width=\"117\"  bgcolor=\"#99CCCC\" height=\"192\" valign=\"top\">
                <p align=\"center\" class=\"LilleOverskrift\">WORLDNEWS<br>BY CONTINENT</p>
                <p align=\"center\" class=\"TykLinks\">
                <%
                    link = \"WNews\"
                    call hent_link(link)
                %>
                    <br></p>
                   
                 
                <p> 
                       
        </td></tr>

        <tr align=\"center\">
        <td width=\"117\"  bgcolor=\"#FCEDB3\" height=\"114\" valign=\"top\">
                 
                       
        </td></tr>

    </table>
    </td>
<!-- Slut paa venstre side at \"body\" -->


<!-- Start paa miderste del at \"body\" -->
<td width=\"407\" valign=\"top\" height=\"1\">

<table border=\"0\" cellspacing=\"0\" width=\"398\" height=\"589\">
<tr><td width=\"403\" valign=\"top\" align=\"left\" height=\"587\">
   
  <table border=\"0\" cellspacing=\"0\" width=\"395\" height=\"329\">
    <tr>
<td  valign=\"top\" width=\"200\" height=\"96\">
<table border=\"0\" width=\"76%\" cellspacing=\"0\" cellpadding=\"3\" height=\"278\">
            <tr>
              <td width=\"100%\" bordercolorlight=\"#000000\" valign=\"top\" height=\"71\">
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\">
            <tr>
              <td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
              <td width=\"200\" align=\"center\" bgcolor=\"#003F5C\" valign=\"top\"><font color=\"#FFFFFF\" face=\"Arial\"><b>On-Line
                Chat</b></font></td>
              <td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
                   
      <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
     
     
          <tr>
            <td width=\"200\" colspan=\"2\" valign=\"top\">
             
                  <b><font face=\"Arial\" size=\"2\">På tværs af fag/landegrænser</font></b>
               
            </td>
          </tr>
          <tr>
        <td width=\"68\" valign=\"top\">
        <img border=\"0\" src=\"images/forsid2.jpg\">
        </td>   
        <td width=\"140\" valign=\"top\">
          <font face=\"Arial\" size=\"2\">Mød ligesindede i det globale rum og tal
          om alt mellem himmel og jord.</font>
        </td>
          </tr>
    </table>
    <table width=\"199\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
     
     
          <tr valign=\"top\">       
            <td width=\"199\" bordercolorlight=\"#18949C\" valign=\"top\" class=\"TyndLinks\"><a href=\"/dkchat/\"><b>Se
              hvilke nationaliteter der chatter netop nu</b></a>            </td>
</tr>
</table>
</td>
</tr>
<tr>
              <td width=\"100%\" valign=\"top\" height=\"21\"> </td>
            </tr>
            <tr>
              <td width=\"100%\" valign=\"top\" height=\"1\">
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\">
            <tr>
              <td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
              <td width=\"200\" align=\"center\" bgcolor=\"#003F5C\" height=\"20\"><font color=\"#FFFFFF\" face=\"Arial\"><b>OpgaveBank</b></font></td>
              <td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
            <tr align=\"center\" valign=\"middle\">
            </tr>
          </table>
<table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
     
     
          <tr>
            <td width=\"200\" colspan=\"2\" height=\"20\"><b><font size=\"2\" face=\"Arial\">Global
              Videndeling</font></b></td>
          </tr>
          <tr>
        <td width=\"68\" valign=\"top\" class=\"TyndLinks\">
        <a href=\"/videndeling/\"><img border=\"0\" src=\"images/communication.gif\" width=\"71\" height=\"62\"></a>
        </td>   
                <td height=\"72\">  <font face=\"Arial\" size=\"2\">Upload dine doku- menter i
                  vores opgavebank. Eller hent inspiration. </font>
        </td>
          </tr>
    </table>
 
             
    <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
     
     
          <tr>
            <td width=\"200\" valign=\"top\" height=\"21\">  <font face=\"Arial\" size=\"2\"><b><a href=\"/videndeling/\">Besøg
              OpgaveBanken</a></b></font>
            </td>
          </tr>
          <tr>
            <td width=\"200\" valign=\"top\" height=\"10\"><b><font face=\"Arial\" color=\"#FF0000\" size=\"1\">Seneste
              5 dokumenter uploadet:</font></b>
            </td>
          </tr>
          <tr>
            <td valign=\"top\" height=\"100%\"><p class=\"TykLinks\"> 
           
<%
call nyesteOpg(\"opg\")

%>
           


            </td>
          </tr>
       
     
     
    </table>
 
                  </td>
            </tr>
            <tr>
              <td width=\"200\" height=\"1\" valign=\"top\"><font size=\"1\"> </font></td>
            </tr>
            <tr>
              <td width=\"200\" valign=\"top\" height=\"20\"></td>
            </tr>
            <tr>
              <td width=\"100%\" valign=\"top\" height=\"145\">
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\">
            <tr>
              <td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
              <td width=\"200\" align=\"center\" bgcolor=\"#003F5C\" height=\"20\" valign=\"top\"><font color=\"#FFFFFF\" face=\"Arial\"><b>Event
                Kalender</b></font></td>
              <td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
                   
      <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
<tr valign=\"top\">       
            <td width=\"200\" colspan=\"3\" height=\"20\">
  <font face=\"Arial\" size=\"2\"><b>Glem ikke de gode foredrag</b></font>
</td>
          </tr>
<tr valign=\"top\">       
        <td width=\"68\">
        <img border=\"0\" src=\"images/forsid2.gif\" width=\"66\" height=\"60\">
        </td>   
        <td width=\"140\">
          <font face=\"Arial\" size=\"2\">Indsæt selv opslag om aktiviteter.
          Foredrag, seminarer, fester etc.</font>
        </td>
      </tr>
    </table>
<table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"59\">
<tr>
            <td width=\"200\" valign=\"top\" height=\"20\"><b><font face=\"Arial\" size=\"2\"><a href=\"/kalender/\">Vælg
              først fagområde:</a></font></b></td>
</tr>
<tr>
            <td width=\"200\" valign=\"top\" height=\"17\"><b><font face=\"Arial\" color=\"#FF0000\" size=\"1\">Seneste
              5 opslag i Kalenderen:</font></b></td>
</tr>
<tr>
            <td width=\"200\" valign=\"top\" height=\"22\" ></td>
</tr>
</table>
</td>
            </tr>
</table>
</td>
<td align=\"center\" width=\"384\" valign=\"top\" height=\"96\">
<table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"3\" height=\"584\">
<tr>
<td width=\"100%\" bordercolorlight=\"#000000\" height=\"578\" valign=\"top\">
<table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\">
<tr>
<td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
<td width=\"200\" align=\"center\" bgcolor=\"#003F5C\"><b><font color=\"#FFFFFF\" face=\"Arial\" size=\"3\">Her
  og nu</font></b></td>
<td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
                   
      <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
     
     
          <tr>
            <td width=\"200\" valign=\"top\"><b><font face=\"Arial\" size=\"2\"><font color=\"#FF0000\">Velkommen 
              <%   
    if (session(\"Authenticated\")= \"1\" ) then
%>
<%=session(\"brugernavn\") %>
           
              </font>
           
<%
    end if
%>
           
           
            </font></b></td>
          </tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" valign=\"top\"><font color=\"#000000\" face=\"Arial\" size=\"2\"><b>Der
        er <%=Application(\"AntalBrugere\") %> aktive brugere online</b></font>
            </td>
          </tr>
       
     
     
      <tr valign=\"top\">       
        <td width=\"200\" valign=\"top\">
        <b><font color=\"#FF0000\" size=\"2\" face=\"Arial\">For medlemmer:</font></b>
        </td>   
      </tr>
    </table>
    <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"509\">
     
     
          <tr valign=\"top\">       
            <td width=\"200\" height=\"21\" class=\"TyndLinks\" valign=\"top\"><a href=\"/community/hvemeronline.asp\">Hvem
              er Online netop nu?</a></td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" height=\"21\" class=\"TyndLinks\" valign=\"top\"><a href=\"/community/aendreprofil.asp\">Her kan du ændre din profil</a></td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" height=\"23\" valign=\"top\"></td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" height=\"39\">  </td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" valign=\"top\" height=\"156\">
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\">
            <tr>
              <td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
              <td width=\"200\" align=\"center\" bgcolor=\"#003F5C\" valign=\"top\" height=\"20\"><b><font color=\"#FFFFFF\" face=\"Arial\">DebatForum</font></b></td>
              <td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
            <tr align=\"center\" valign=\"middle\">
            </tr>
          </table>
         
      <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"97\">
     
     
          <tr valign=\"top\">       
            <td width=\"200\" colspan=\"2\" height=\"20\">
             
                  <font face=\"Arial\" size=\"2\"><b>Kig med eller deltag aktivt</b></font>
               
            </td>
          </tr>
<tr valign=\"top\">       
        <td width=\"68\" height=\"77\">
        <a target=\"_top\"><img src=\"billeder/forside/life.gif\" border=\"0\" width=\"73\" height=\"62\"></a>
        </td>   

        <td width=\"140\" height=\"77\">
          <font face=\"Arial\" color=\"#000000\" size=\"2\">Deltag i den faglige debat. Hvor
          alt kan vendes og drejes</font>
        </td>
      </tr>
    </table>

<table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"61\">
<tr valign=\"top\">       
<td width=\"200\" class=\"TyndLinks\" height=\"21\">
<a href=\"/forum2/\"><b><font face=\"Arial\" size=\"2\">Debatten er i fuld gang...</font></b></a>
</td>
          </tr>
  <tr valign=\"top\">       
            <td width=\"200\" valign=\"top\" height=\"10\"><b><font face=\"Arial\" color=\"#FF0000\" size=\"1\">Seneste
              5
              indlæg i Debatten:</font></b></td>
</tr>
     
          <tr valign=\"top\">       
            <td width=\"200\" height=\"20\" valign=\"top\"><p class=\"TykLinks\">           
<%
        call nyestedebat(\"deb\")
%>


            </td>
</tr>
</table>
            </td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" valign=\"top\" height=\"20\" ><font size=\"1\"> </font></td>
</tr>
     
     
          <tr valign=\"top\">       
            <td width=\"200\" valign=\"top\" height=\"25\" ></td>
</tr>
     
     
          <tr>
              <td width=\"100%\" valign=\"top\" height=\"166\">
          <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" bgcolor=\"#999999\" height=\"19\">
            <tr>
              <td width=\"8\" valign=\"top\" bordercolorlight=\"#000000\" bgcolor=\"#003F5C\" height=\"19\"><font face=\"Arial\"><img src=\"images/wpe34811.gif\"></font></td>
              <td width=\"200\" align=\"center\" bgcolor=\"#003F5C\" valign=\"top\" height=\"19\"><font color=\"#FFFFFF\" face=\"Arial\"><b>BaZar</b></font></td>
              <td width=\"8\" align=\"right\" valign=\"top\" bgcolor=\"#003F5C\" height=\"19\"><font face=\"Arial\"><img src=\"images/wpe35687.gif\"></font></td>
            </tr>
          </table>
<table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"72\">
     
     
          <tr valign=\"top\">       
            <td width=\"200\" colspan=\"3\" valign=\"top\" height=\"20\">
             
                  <font face=\"Arial\" size=\"2\"><b>Køb, salg og bytte</b></font>
</td>
          </tr>
<tr valign=\"top\">       
        <td width=\"65\" valign=\"top\" height=\"52\">
        <p align=\"center\">
        <img border=\"0\" src=\"images/forsid3.jpg\" width=\"54\" height=\"60\">
        </p>
        </td>   
        <td width=\"143\" valign=\"top\" height=\"52\">
          <font face=\"Arial\" size=\"2\">Ligger dine bøger og samler støv? Står
          du og mangler en bog der netop er udgået?</font>
        </td>
      </tr>
    </table>
 
             
    <table width=\"200\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" height=\"57\">
          <tr>
            <td width=\"200\" valign=\"top\" height=\"19\" > 
<a href=\"/BaZar_dk/main.asp\"><b><font face=\"Arial\" size=\"2\">Indryk annonce
eller søg
               
</font>
               
</b></a>
               
            </td>
          </tr>
          <tr>
            <td width=\"200\" valign=\"top\" height=\"17\" ><b><font face=\"Arial\" color=\"#FF0000\" size=\"1\">Seneste
              5 annoncer i BaZaren:</font></b></td>
          </tr>
          <tr>
            <td width=\"200\" valign=\"top\" height=\"21\" ><p class=\"TykLinks\">
<%
        call nyesteannonce(\"ann\")
%>
           


          </tr>
</table>
</td>
          </tr>
     
     
</table>
</td>
            </tr>
          </table>
</td>
            </tr>
            </table>

        </td></tr></table>

    </td>
<!-- Slut paa miderste del af body -->
   
    <td width=\"116\" valign=\"top\" align=\"right\" height=\"1\">
<!-- Start paa hoejre side af body -->

        <table border=\"0\" cellspacing=\"0\" width=\"117\" height=\"600\">
        <tr>
                <td bgcolor=\"#99CCCC\" valign=\"top\" width=\"117\"
        <p class=\"LilleOverskrift\" height=\"74\">
            <p class=\"LilleOverskrift\" align=\"center\">KUNST PÅ NETTET</p>
            <p class=\"TykLinks\" align=\"center\">
            <%
                link = \"Kunst\"
                call hent_link(link)
            %>
                        <br></p>
                       
            <p align=\"center\"> 
                   
        </td>
        </tr>

        <tr align=\"center\">
        <td bgcolor=\"#FCEDB3\" align=\"center\" valign=\"top\" width=\"117\" height=\"94\">
            <p class=\"LilleOverskrift\">UNIVERSITETER WORLDWIDE</p>
            <dl>
              <p class=\"TykLinks\"><a href=\"java script:AabenLink(\'http://geowww.uibk.ac.at/univ/world.html\')\">Links til over 5000 universiter i 154 lande</a></p>
              </dl>
                           
        </td></tr>

        <tr align=\"center\">
        <td bgcolor=\"#99CCCC\" align=\"center\" valign=\"top\" width=\"117\" height=\"135\">
            <p class=\"LilleOverskrift\">DIVERSE</p>
            <dl>
              <p class=\"TykLinks\"><a href=\"java script:AabenLink(\'http://www.hotmail.com\')\">Hotmail.com</a>              <br><a href=\"java script:AabenLink(\'http://www.bibliotek.dk\')\">Bibliotek.dk</a></p>
              </dl>
                           
             
        </td></tr>
        <tr align=\"center\">
        <td bgcolor=\"#FCEDB3\" align=\"center\" valign=\"top\" width=\"117\" height=\"100%\">
                           
            <p class=\"LilleOverskrift\"> 
                           
            <p class=\"LilleOverskrift\"> 
                           
            <p class=\"LilleOverskrift\"> 
        </td></tr>

</table>
   
    </td></tr>
</table>
</table>
</body>


Avatar billede gizmo-gizmo Nybegynder
10. maj 2001 - 17:53 #1
de 30 passer lige til at læse koden igennem *S*
Avatar billede zyber Nybegynder
10. maj 2001 - 18:04 #2
Det jeg lige kan se ved at kigge sourcen igennem er at du åbner og lukker din connection til databasen mange gange.

Start med at åbne connection\'en i toppen at siden og luk den i bunden, det burde du vinde noget tid ved.
Avatar billede forskningsforum Nybegynder
10. maj 2001 - 18:37 #3
gizmo - forstår din hentydning... meningen var nu blot at I hajer skulle \"scrolle\" en tur ned af scriptet og finde en rød tråd og komme med løsningsforslag. Hvis een påtager sig at \"rense\" scriptet kaster jeg gerne flere points i.
Avatar billede forskningsforum Nybegynder
10. maj 2001 - 19:26 #4
zyber. Hvordan gør jeg det mere præcist? Jeg henter jo fra 2 forskellige databaser (1. database - 2. fildb)?
Avatar billede madrich Nybegynder
10. maj 2001 - 19:33 #5
Det er nok ikke så meget serverbelastningen du skal tænke på

dit script fylder 43 kb + alle dine grafikker, måske skal der begrænses lidt det, samtidig tror jeg nok at det skulle være muligt at optimere gifferne og jpg\'erne!
Avatar billede madrich Nybegynder
10. maj 2001 - 19:35 #6
din klode der drejer, fylder 28 kb, det er heller ikke smart, når man tænker på load-hastighed!
Avatar billede madrich Nybegynder
10. maj 2001 - 19:39 #7
du har omkring de 120 kb på forsiden, det tager tid at loade, og der kan hentes meget ved at optimere billeder, samt rydde lidt op i dit HTML, frontpage har det med at skrive lidt for meget fremfor lidt for lidt, der er nok en del KB at hente, bare ved at fjerne alle mellemrummene, da browseren ikke har behov for at de er der, (tvært imod), men de fylder når det skal hentes!
Avatar billede madrich Nybegynder
10. maj 2001 - 19:44 #8
Mht. Access så er det en smule langsommere end en \"ikke filbaseret\" database, men det bør ikke have den store indflydelse på hastigheden, når der ikke åbnes og lukkes mange gange, --> det skal da siges at Access ikke er beregnet til at håndtere menge brugere af gangen!
Avatar billede madrich Nybegynder
10. maj 2001 - 19:47 #9
primært ville være HTML delen OG optimering (evt. remove) af billederne, da det vil give en stor forbedring!

Sekundært kan du skifte til en ikke-filbaseret database!
Avatar billede forskningsforum Nybegynder
10. maj 2001 - 19:58 #10
Gode konstruktive forslag - som jeg vil arbejde videre med.
Avatar billede ricardo Nybegynder
10. maj 2001 - 19:59 #11
Du er heldig! Jeg er mídt i en hardcore optimerings-fase, da vi går live med en 1000-brugers intranet system om en lille måneds tid...her er et par tips, og de er helt gratis.

Ingen tvivl om, at du har lagt et stort stykke arbejde i din site: og det skal du være stolt af.

Generelt følger du god skik: du erklærer dine variabler, og lukker dine recordsets (altid en god ide - det kan være en dræber at have flere åben på en gang, især med Access). Vi kan ikke se havd der sker i dine include-filer.

Hvis jeg var dig ville jeg gøre således:

set rs = conn.execute(sql)

da det er en hurtig metode.

Og så vil jeg også gøre sådan:

rs.close

set rs = nothing

- altså ødelægge referencen, hvilket frigører de resourcer ADO bruger på den, inden du fyrer næste opslag af.

Siden du bruger subroutines (også en god ide - du har fået fat i den gode stil) vil jeg også erklære variablene (i dette tilfælde rs og conn) lokalt, dvs i sub\'en. Det går hurtigere ifølge MS.

Connections er ikke det store problem (hvis servere kører en nyere MDAC) da de ligger klar i en \"pulje\" og skal ikke skabes hver gang, så jeg vil anbefale at du \"åbner sent og lukker tidligt\".

GetRows er en meget hurtig metode, men er ikke for begyndere...eller FuckPage, eller hvad den nu hedder.

Når du skal bruge Response.Write mange gange, kan du med fordel bruge With:

with response
  .write \"blah blah\"
  .write \"bleh bleh\"
  .write \"bløh bløh\"
end with

men dine strenge er så korte, så

response.write \"<a href=\"\"java script:AabenLink(\'\" & RS(\"URL\") & \"\')\"\">\" & RS(\"Beskrivelse\") & \"</a><br>\"

ville være helt fine.

Man kan også bruge feltets index, som er en anelse hurtigere:

response.write \"<a href=\"\"java script:AabenLink(\'\" & RS(0) & \"\')\"\">\" & RS(1) & \"</a><br>\"

(rækkefølgen er den samme som i din SQL sætning)

BTW: \"select * \" tvinger DB\'en til at lave mere:

\"select felt1, felt2, felt3 [osv...]\"

er bedre, da den ved lige præcis havd den skal hente, og ADO ved hvad felterne hedder. Skift felt1 osv. ud med dine kolonnenavne.

Håber du fik noget ud af det - jeg var selv begynder en gang :)
Avatar billede ricardo Nybegynder
10. maj 2001 - 20:01 #12
ps: siden er i det hele taget ret store: 47 kb uden grafik...det tager altsammen tid at hente.

Du kunne sætte størrelse på dine billeder, hvilket gør det nemmere for browseren.

Og lige en sidste tanke: buffering.

<% Option Explicit
response.buffer = true
%>

er noget som MS anbefaler.
Avatar billede ricardo Nybegynder
11. maj 2001 - 22:35 #13
Hva\'så? Ikke så meget som en \"tak for hjælp\"...?
Avatar billede forskningsforum Nybegynder
12. maj 2001 - 16:57 #14
Ricardo - Tusinde tak for dine givtige og gode råd. Jeg er meget ked af, at jeg ikke har set dine kommentarer før nu. Jeg har simpelthen ikke været ved skærmen siden jeg takkede madrich, trods det at du kommenterede alledere eet minut senere. Da jeg havde modtaget madrich\'s svar slukkede jeg for anlægget og har ikke været på siden. Jeg forstår din skuffelse over manglende respons. Dette beklager jeg meget.

Endnu engang tusinde tak - jeg ved, at dine kommentarer er fyldt af engagement.

God weekend
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
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
Seneste spørgsmål Seneste aktivitet
I dag 10:32 hvilken afløser kan I anbefale? Af jcr18 i Andet sikkerhed
I dag 09:27 Hjælp til Api.asmx Af lurup i Andet programmering
I går 10:59 Ændre navn på ost-fil i Outlook Af TTA i Office & Kontorpakker
15/0316:12 Outlook fejler: 0x80070057 + 0x800CCC0E Af TTA i Office & Kontorpakker
14/0320:13 PIHOLE Af dcedata1977 i Linux
White papers
Flere white papers »