Avatar billede cayenne Nybegynder
24. april 2002 - 14:19 Der er 3 kommentarer og
1 løsning

Udskrive databaseresultat til webside i tabeller

Jeg har et script der udskriver en søgning i tabeller, men jeg får af en eller anden grund ikke alle poster med, når jeg opstiller det i en tabel (Det virker fint ellers). Så jeg må gøre noget forkert i min asp-tabel-kode. Håber I kan hjælpe med at finde fejlen.

<%   


    response.Write("<table border='1' cellpadding='1' cellspacing='0' width='700' bordercolor='#E7EFF7'>")



do until rs.eof


response.Write("<tr>")

response.Write("<td width='60' valign='top'><font size='2' face='Arial'>")
if not rs.eof then
response.Write("<a href=http://inlineudv/inline/almen/service/DRresearch/closed/R-RC/Databaser/Quiz/Quiz_vis.asp?Postid=")
response.Write(rs("Postid"))
response.Write("><font size='2' face='Arial'>")
response.Write(rs("Arkivnr"))
response.Write("</font> </a>")
rs.MoveNext
End if
response.Write("</td>")



response.Write("<td width='300' valign='top'><font size='2' face='Arial'>")
if not rs.eof then
response.Write(rs("Sp"))
rs.MoveNext
End if
response.Write("</td>")

response.Write("<td width='250' valign='top'><font size='2' face='Arial'>")
if not rs.eof then
response.Write(rs("Svar"))
rs.MoveNext
End if
response.Write("</td>")

response.Write("<td width='30' valign='top'><font size='2' face='Arial'>")
if not rs.eof then
response.Write(rs("Playliste"))
rs.MoveNext
End if
response.Write("</td>")

response.Write("<td width='60' valign='top'><font size='2' face='Arial'>")
if not rs.eof then
response.Write(rs("Spnr"))
rs.MoveNext
End if
response.Write("</td>")

response.Write("</tr>")

loop
response.Write("</table></font>")

%>
Avatar billede rou Nybegynder
24. april 2002 - 14:30 #1
Alle de rs.movenext du har efter dit loop, vil fejle.
Du kan ikke gå længere end til enden, af et recordset.
Avatar billede rou Nybegynder
24. april 2002 - 14:32 #2
Ellers er der ikke nogen deciderede fejl, at jeg kan få øje på.

Du siger at ikke alle dine poster kommer med.. har du prøvet at skrive din Query ud, og så prøve den af i en Query analyzer, for at se om den viser det samme?
Avatar billede eagleeye Praktikant
24. april 2002 - 14:55 #3
Fjerne alle rs.MoveNext inden End if. Ellers går du for hver kolonne du har udkrevet en record frem...

  rs.MoveNext    <--------- Linie fjernes
End if


I stedet for dem skal du så indsætte rs.MoveNext lige ingen Loop:

  response.Write("</tr>")
  rs.MoveNext                '<-------- Indsæt
loop


Så skulle du få alle record med.
Avatar billede cayenne Nybegynder
24. april 2002 - 15:14 #4
Tusind tak. Det var liiiiiiiiige det der løste problemet :o)
Også tak til rou.
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