Avatar billede jamal_s Nybegynder
04. oktober 2001 - 15:58 Der er 29 kommentarer og
1 løsning

tal foran ?

hej
hvordan kan jeg ligge tal ved siden være \"link\" på denne side..

http://www.friserverplads.dk/hw2002/start/toplist.asp


Tal (hvad jeg mener):
<OL TYPE=\"1\">
<li>
</ol>

Script (den du skal redigere på):
strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 1
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
Do until rs.eof
    count = count+1
    Response.Write \"<td>\" & rs(\"title\") & \"</td>\"
        if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</tr></table>\"
Avatar billede egede Nybegynder
04. oktober 2001 - 16:03 #1
<ol>
<%
strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 1
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
Do until rs.eof
    count = count+1
    Response.Write \"<li><td>\" & rs(\"title\" & \"</td></li>\"
        if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</ol></tr></table>\"
Avatar billede egede Nybegynder
04. oktober 2001 - 16:03 #2
Response.Write \"<li><td>\" & rs(\"title\") & \"</li></td>\"
min fel ;)
Avatar billede egede Nybegynder
04. oktober 2001 - 16:04 #3
jeg kan overhovedet ikke stave i dag!!!!!
fel = fejl
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:08 #4
Avatar billede egede Nybegynder
04. oktober 2001 - 16:10 #5
jeps, det virker ;)
Avatar billede egede Nybegynder
04. oktober 2001 - 16:11 #6
du har vist bare glemt:
  <ol>
Response.Write\"</ol></tr></table>\" 
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:12 #7
det var tal i række følge...

1.
2.
3.
osv....

ik
1.
1.
1.
osv..


http://www.friserverplads.dk/hw2002/start/toplist.asp
Avatar billede egede Nybegynder
04. oktober 2001 - 16:16 #8
Du skal først slutte <ol> til sidst, jeg satte det lidt ulogisk op, så her kommer hele scriptet:

<ol>
<%
strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 1
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
Do until rs.eof
    count = count+1
  Response.Write \"<li><td>\" & rs(\"title\") & \"</li></td>\"
  if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</ol></tr></table>\"
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:16 #9
det virker stadig væk ik :(

strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 0
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
Do until rs.eof
    count = count+1
    Response.Write \"<td><ol><li>\" & rs(\"title\") & \"</td>\"
        if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</ol></li></tr></table>\"
Avatar billede egede Nybegynder
04. oktober 2001 - 16:17 #10
fejl igen...
Response.write \"<ol>\"
strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 0
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
Do until rs.eof
    count = count+1
    Response.Write \"<td><li>\" & rs(\"title\") & \"</li></td>\"
        if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</ol></li></tr></table>\"
Avatar billede egede Nybegynder
04. oktober 2001 - 16:18 #11
for sat*n jeg kan bare ikke skrive i dag ;-)
Response.Write\"</ol></tr></table>\"
hedder sidste linie *gg*
Håber du bærer over med mig...
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:19 #12
nu viser den ik tal mere ?
Avatar billede egede Nybegynder
04. oktober 2001 - 16:21 #13
Det er fordi du mangler at erstatte disse linier:
Response.write \"<ol>\"
Response.Write\"</ol></tr></table>\"

se hvor de skal sættes ind ovenover...
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:24 #14
virker hellere ik ?
Avatar billede egede Nybegynder
04. oktober 2001 - 16:29 #15
2 sek.
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:32 #16
jeps :)
Avatar billede egede Nybegynder
04. oktober 2001 - 16:35 #17
Tror at det er dine rammers skyld...
så prøv denne:

strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 0
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
t = 0
Do until rs.eof
  t = t + 1
    count = count+1
    Response.Write \"<td>\" & t & \". \" & rs(\"title\") & \"</td>\"
        if count = 2 then
            response.write \"</tr><tr>\"
            count = 0
        end if
rs.movenext
loop
Response.Write\"</tr></table>\" 
Avatar billede egede Nybegynder
04. oktober 2001 - 16:38 #18
Som du kan se virker det fint uden tabels:
http://www.friserverplads.dk/egede/eksperten/test.asp
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:39 #19
YES det virker...men hvorfor står talene i forkert rækkefølge..


1                      2
3                      4
osv


kan du ik få dem til at blive sådan
1                      3
2                      4

på forhånd tak for hjælpen :O)
Avatar billede egede Nybegynder
04. oktober 2001 - 16:44 #20
er det ok at du får den senere?
Skal desværre løbe nu ;)
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 16:48 #21
ok det skal jeg også jeg skal til træning...jeg kommer igen om 2 timer....har du den så ?
Avatar billede egede Nybegynder
04. oktober 2001 - 19:31 #22
Til træning hvor? (nysgerrighed)
Hvis jeg skal lave en løsning (for 15 p. *s*), så bliver den sådan at jeg lige skal finde ud af hvor mange numre der er nedaf...
Avatar billede egede Nybegynder
04. oktober 2001 - 19:54 #23
Skift x ud med antal linier nedaf...:
strSQL = \"SELECT * From toplist\"
Set rs = myConn.Execute(strSQL)
count = 0
Response.Write \"<table width=\'100%\' border=\'0\' cellspacing=\'2\'><tr>\"
t = 0
x =
Do until rs.eof
  t = t + 1
    count = count+1

        if count = 2 then
        t = t + x
            Response.Write \"<td>\" & t & \". \" & rs(\"title\") & \"</td>\"
            response.write \"</tr><tr>\"
            count = 0
        t = t - x
        Else
    Response.Write \"<td>\" & t & \". \" & rs(\"title\") & \"</td>\"
        end if
rs.movenext
loop
Response.Write\"</tr></table>\" 
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 20:21 #24
jeg får fejl her:
x =
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 20:23 #25
den skal KUN vise 10
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 20:23 #26
træning = fodbold træning :)
jeg lægger 15 ekstra på !
Avatar billede jamal_s Nybegynder
04. oktober 2001 - 20:23 #27
15 point
Avatar billede egede Nybegynder
05. oktober 2001 - 14:54 #28
virkede det?
hvad er dit ICQ#? sad nemlig ved en anden computer i går...
Avatar billede jamal_s Nybegynder
05. oktober 2001 - 14:56 #29
både ja og nej...det virkede men den vidste kun 9 ik 10 :) men jeg kan leve med det...og tak for hjælpen !
Avatar billede egede Nybegynder
05. oktober 2001 - 15:03 #30
så lidt, tak for point ;)
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