Avatar billede Slettet bruger
06. november 2001 - 10:50 Der er 4 kommentarer og
2 løsninger

Ud af databasen

Hej - jeg skal hive 6 RS ud fra en database. Dataene skal præsenteres i et table - men med 3 af gangen.
Altså først vises RS 1-3 så 4-6. Hvordan gør man det?

åben databasen...
SQL = \"SELECT * FROM Frugt WHERE kategori = 1\"

(1 er f.eks. \"æbler\")

Der er 6 RS med kategorien 1 - de skal præsenteres i flg. table:


<table width=\"400\" border=\"0\">
  <tr>
    <td>æble 1</td>
    <td>æble 2</td>
    <td>æble 3</td>
  </tr>
  <tr>
    <td>æble 4</td>
    <td>æble 5</td>
    <td>æble 6</td>
  </tr>
</table>

Men RS har IKKE fortløbende id-numre eller lignende... Derfor er det vel et eller andet i stil med (i pseudo-kode):
<table width=\"400\" border=\"0\">
  <tr>
From RS 1 to 3 do
    <td>æble</td>
RS.MoveNext
Loop
  </tr>
  <tr>
From RS 4 to 6 do
    <td>æble</td>
<%  RS.MoveNext
Loop
RS.Close
Set RS = Nothing
%>
  </tr>
</table>
Avatar billede medions Nybegynder
06. november 2001 - 11:01 #1
så skal du skrive:

<table>
<% while NOT rs.EOF %>
<tr>
<td><%= rs(\"dit feld\") %></td>
</tr>
<% rs.MoveNext %>
<% Wend %>
</table>
Avatar billede medions Nybegynder
06. november 2001 - 11:02 #2
Din løkke er ikke en særlig god løsning til at trække data\'er ud fra DB\'en..
-brug hellere den jeg skrev til dig... ;-)
Avatar billede Slettet bruger
06. november 2001 - 11:03 #3
hvad er \"dit feld\"?
Avatar billede eagleeye Praktikant
06. november 2001 - 12:31 #4
du kan evt bruge dette, colPrRow angiver hvormange kolonner pr række du vil havde. Så vidt jeg kan se er det 3 pr række.

colPrRow = 3
colInRow = 0
response.write \"<table border=\"\"1\"\">\"
do while NOT RS.EOF
  if colInRow = 0 then response.write \"<tr>\"
  response.write \"<td>\" & RS(\"KOLONNE_NAVN\") & \"</td>\" \'tilret udskrivning til dine felter.

  colInRow = colInRow + 1
  if colInRow >= colPrRow then
    colInRow = 0
    response.write \"</tr>\"
  end if
  RS.MoveNext
loop
if colInRow > 0 then
  for i = colInRow to colPrRow-1
    response.write \"<td>&nbsp;</td>\"
  next
  Response.Write \"</tr>\"
end if
response.write \"</table>\"
Avatar billede eagleeye Praktikant
21. september 2002 - 23:42 #5
Var det noget du kunne bruge?
Avatar billede medions Nybegynder
20. januar 2003 - 13:49 #6
Thx 4 Poinz

//>Rune
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