Avatar billede okay Nybegynder
31. december 2000 - 15:15 Der er 7 kommentarer og
1 løsning

TOP20

jeg har fået en script, hvor den viser top20, men det gøre den ik, den viser alle de ting i databasen, men jeg ved ik hvorfor.

<SCRIPT language=javascript>
    function se(id,h,b) {
        window.open(\"popup.asp?id=\"+id,\"new\",
       
\"resizable=0,scrollbars=1,toolbar=0,location=0,menubar=0,status=0,width=\"+b+\",height=\"+h)
      }
</SCRIPT>
<table width=\"100%\" height=\"71\" cellspacing=\"2\">
                <tr>
                  <td bgcolor=\"#990000\"><font face=tahoma size=2 color=\"#FFFFFF\"><b>Navn:</b></font></td>
                  <td bgcolor=\"#990000\"><font face=\"tahoma\" size=\"2\" color=\"#FFFFFF\"><b>Telefon:</b></font></td>
                  <td bgcolor=\"#990000\"><font face=\"tahoma\" size=\"2\" color=\"#FFFFFF\"><b>Hits: </b></font></td>
                </tr>
<%
Set connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"ringetoner.mdb\")
sql = \"select Top 20 * from ringetoner where godkendt=\'Ja\' ORDER BY setgange DESC\"
Set rs = Server.CreateObject(\"ADODB.Recordset\")
set rs = Connect.execute(SQL)

While not rs.eof
%>
                <tr>
                  <td><font face=\"tahoma\" size=\"2\"><A href=\'java script:se(\"<% = rs(\"id\") %>\",400,480)\' style=\"color: #000000\"><% = rs(\"navn\") %></A></font></td>
                  <td><font face=\"tahoma\" size=\"2\"><% = rs(\"tilmobil\") %></font></td>
                  <td><font face=\"tahoma\" size=\"2\"><% = rs(\"setgange\") %></font></td>
                </tr>
<%
rs.movenext
Wend
%>
Avatar billede tpiil Nybegynder
31. december 2000 - 15:17 #1
det er sikkert fordi der står det samme i setgange i db\'en!
hvis der f.eks. står sådan her:
hits:
3
2
1
1
1
1
1
1
1
osv. hvis alle så er 1 kommer de med på listen!
Avatar billede nomiz Nybegynder
31. december 2000 - 15:19 #2
okay> Må man spørge hvorfor du skriver \"En side som denne, vil koste ca.1020 kr.\", på din design-hjemmeside? - Eh 1020 kr.? Hvorfor liiiige 1020 kr - Det forekommer mig en del skævt, undskyld.. :)

/vh
Simon
Avatar billede okay Nybegynder
31. december 2000 - 15:23 #3
Nomiz...fattede ingen pind....

Tpill, det skal jeg nok prøve ;)
Avatar billede netsrac Praktikant
31. december 2000 - 15:25 #4
Løsning så der altid kun kommer 20

<SCRIPT language=javascript>
    function se(id,h,b) {
        window.open(\"popup.asp?id=\"+id,\"new\",
       
\"resizable=0,scrollbars=1,toolbar=0,location=0,menubar=0,status=0,width=\"+b+\",height=\"+h)
      }
</SCRIPT>
<table width=\"100%\" height=\"71\" cellspacing=\"2\">
                <tr>
                  <td bgcolor=\"#990000\"><font face=tahoma size=2 color=\"#FFFFFF\"><b>Navn:</b></font></td>
                  <td bgcolor=\"#990000\"><font face=\"tahoma\" size=\"2\" color=\"#FFFFFF\"><b>Telefon:</b></font></td>
                  <td bgcolor=\"#990000\"><font face=\"tahoma\" size=\"2\" color=\"#FFFFFF\"><b>Hits: </b></font></td>
                </tr>
<%
Set connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"ringetoner.mdb\")
sql = \"select * from ringetoner where godkendt=\'Ja\' ORDER BY setgange DESC\"
Set rs = Server.CreateObject(\"ADODB.Recordset\")
set rs = Connect.execute(SQL)

count = 20
While not rs.eof and count > 0
%>
                <tr>
                  <td><font face=\"tahoma\" size=\"2\"><A href=\'java script:se(\"<% = rs(\"id\") %>\",400,480)\' style=\"color: #000000\"><% = rs(\"navn\") %></A></font></td>
                  <td><font face=\"tahoma\" size=\"2\"><% = rs(\"tilmobil\") %></font></td>
                  <td><font face=\"tahoma\" size=\"2\"><% = rs(\"setgange\") %></font></td>
                </tr>
<%
count = count -1
rs.movenext
Wend
%>
Avatar billede okay Nybegynder
31. december 2000 - 15:28 #5
hvad har du lavet netsrac....eller nu hvad har du skiftet på scripten ;)
Avatar billede netsrac Praktikant
31. december 2000 - 15:30 #6
Lavet lidt om på din sql:
sql = \"select * from ringetoner where godkendt=\'Ja\' ORDER BY setgange DESC\"

indsat en count

count = 20
While not rs.eof and count > 0
count = count -1

Avatar billede okay Nybegynder
31. december 2000 - 15:32 #7
netsrac...ok tak, det virkede ;)
Avatar billede netsrac Praktikant
31. december 2000 - 15:35 #8
Det var så lidt :-)
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