Avatar billede cdc Novice
23. april 2004 - 14:26 Der er 14 kommentarer og
2 løsninger

utræk skal ikke loope fra en tabell

Jeg har et script se neders hvor jeg henter nogle dataer fra DB og resultatet ser således ud:

Fiflerhold 1 - Jacob Bruun Christensen - 0 - 0
Fiflerhold 1 - Kevin Agerholm Christensen - 0 - 0
Fiflerhold 1 - Morten Gram Larsen - 0 - 0
Fiflerhold 1 - Nikolaj R. Hansen - 0 - 0
Fiflerhold 1 - Anne Larson - 0 - 0
Fiflerhold 1 - Alberthe Greve - 0 - 0

er det en måde hvorpå man kun udskriver Fiflerhold 1, en gang og i første linie, så det ikke gentager sig hele tiden.

Koden er her:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dream.mdb")
SQL = "select top 6 hold.holdnavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"
Set rs = conn.Execute(SQL)
do while not rs.EOF
  Response.Write rs("holdnavn") & " - " & rs("spillernavn") & " - " & rs("sidsterunde") & " - " & rs("totalt") & "<br>"
  rs.Movenext
loop
%>
Avatar billede cdc Novice
23. april 2004 - 14:34 #1
setter den op fra 15 til 30 points og kommer et spm. til på.

i tabellen hold hvod den henter holdnavn har jeg også deltagernavn, som jeg i ovenstående kode ikke kan skrive ind uden at det bliver en fejl..hvorfor
Avatar billede and_ Nybegynder
23. april 2004 - 16:01 #2
hvad med at sætte en lille tæller på :)

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dream.mdb")
SQL = "select top 6 hold.holdnavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"
Set rs = conn.Execute(SQL)
i = o
do while not rs.EOF
if i = 0 then
  Response.Write rs("holdnavn") & " - " & rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
else
  Response.Write rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
end if
  rs.Movenext
loop
%>

Ville måske også være smart at smide den ind i tabel... bare for designets skyld :D
Avatar billede and_ Nybegynder
23. april 2004 - 16:01 #3
sorry, jeg sover

det skal være:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dream.mdb")
SQL = "select top 6 hold.holdnavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"
Set rs = conn.Execute(SQL)
i = o
do while not rs.EOF
if i = 0 then
  Response.Write rs("holdnavn") & " - " & rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
else
  Response.Write rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
end if
i = i + 1
rs.Movenext
loop
%>
Avatar billede and_ Nybegynder
23. april 2004 - 16:02 #4
jeg er en værre tasteabe idag:

i = 0
do while not rs.EOF
if i = 0 then
  Response.Write rs("holdnavn") & " - " & rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
else
  Response.Write rs("spillernavn") & " - " & rs
("sidsterunde") & " - " & rs("totalt") & "<br>"
end if
i = i + 1
rs.Movenext
loop
Avatar billede and_ Nybegynder
23. april 2004 - 16:08 #5
kunne ikke lade være ;)

%>
<table border="0" cellpadding="0" cellspacing="0">
<%
i = 0
do while not rs.EOF
if i = 0 then
%>
<tr>
    <td><%=rs("holdnavn")%></td>
    <td>-</td>
    <td><%=rs("spillernavn"%></td>
    <td>-</td>
    <td><%=rs("sidsterunde")%></td>
    <td>-</td>
    <td><%=rs("totalt")%></td>
</tr>
<%
else
%>
<tr>
    <td>&nbsp;<!-- dette er bedre med en tom pix.gif --></td>
    <td>-</td>
    <td><%=rs("spillernavn"%></td>
    <td>-</td>
    <td><%=rs("sidsterunde")%></td>
    <td>-</td>
    <td><%=rs("totalt")%></td>
</tr>
<%
end if
i = i + 1
rs.Movenext
loop
%>
</table>
Avatar billede eagleeye Praktikant
23. april 2004 - 23:15 #6
Andet eks, og som hvis holdet skifter udskriver det nye navn_


<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("dream.mdb")
SQL = "select top 6 hold.holdnavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"
Set rs = conn.Execute(SQL)
response.write "<table>"
tmpHold=""
do while not rs.EOF
  response.write "<tr><td>"
  if tmpHold<>rs("holdnavn") then
    tmpHold = rs("holdnavn")
    response.write tmpHold
  else
    response.write "&nbsp;"
  end if
  response.write "</td>"
  response.write "<td>" & rs("spillernavn") & "</td>"
  response.write "<td>" & rs("sidsterunde") & "</td>"
  response.write "<td>" & rs("totalt") & "</td>"
  response.write "</tr>"
  rs.Movenext
loop
response.write "</table>"
%>
Avatar billede cdc Novice
24. april 2004 - 09:11 #7
Kigger på det lidt sener i dag.

Men jeg kan se at ingen af jer har taget højde for mit spm. nummer to, hvad med deltagernavn, som er holdets ejer, som heller ikke skal gentages lige som holdnavnet
Avatar billede cdc Novice
24. april 2004 - 09:12 #8
og lige den sidste her driller max
Avatar billede cdc Novice
24. april 2004 - 21:08 #9
dette virker fint dog kan jeg ikke få deltagernavn med fra hold tabellen
Avatar billede eagleeye Praktikant
24. april 2004 - 23:09 #10
Det med deltager navn skal med i SQl sætningen:
SQL = "select top 6 hold.holdnavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"

Lige nu henter den kun holdnavnet fra hold tabellen. Den skal også hente deltagernavnet sådan her:

SQL = "select top 6 hold.holdnavn, hold.deltagernavn, spillere.* from spillere, hold where (spillere.sid=hold.spiller_1 or spillere.sid=hold.spiller_2 or spillere.sid=hold.spiller_3 or spillere.sid=hold.spiller_4 or spillere.sid=hold.spiller_5 or spillere.sid=hold.spiller_6) order by hold.hid desc"
Avatar billede cdc Novice
25. april 2004 - 10:48 #11
Det ser fint ud, nu skal jeg så bare have "designet" det.
Smider I ikke et svar
Avatar billede eagleeye Praktikant
25. april 2004 - 11:02 #12
Jo her et fra mig :)
Avatar billede cdc Novice
26. april 2004 - 08:02 #13
hvis du vil have points and, så smid et svar
Avatar billede and_ Nybegynder
26. april 2004 - 09:34 #14
svar.... sorry for den lange svartid :)
Avatar billede cdc Novice
26. april 2004 - 10:39 #15
det var en kommentar and :o)
Avatar billede and_ Nybegynder
26. april 2004 - 10:40 #16
jeg kejler i det.... mandag morgen :)
sorry
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