2 udtræk i hver række

Du kan skrive..
i = 0
response.write "<tr>"

s.movefirst
Do while not s.eof

response.write "<td>Udtræk</td>"

i = i+1
s.movenext

if i = 2 then
  response.write "</tr><tr>"
  i = 0
end if

Loop

Response.Write "<TABLE>"
i = 1
Do While NOT rs.EOF
  If i mod 2 = 0 Then
    Response.Write "<TD>" & rs("Felt") & "</TD></TR>"
  Else
    Response.Write "<TR><TD>" & rs("Felt") & "</TD>"
  End If
  i = i + 1
  rs.MoveNext
Loop
rs.Close
If i mod 2 = 0 Then
  Response.Write "<TD>&nbsp;</TD></TR></TABLE>"
Else
  Response.Write "</TABLE>"
End If

carpe

Den går ret i stå med dette:

<table width=100%>
          <%
i = 1
do while not rstemp.eof
If i mod 2 = 0 Then
  %>
 
          <tr>
    <td></td>

<% end if %>
<% else %>

    <tr>
    <td></td>

<% end if %>

<%    End If
i = i + 1
rs.MoveNext
Loop
rs.Close

If i mod 2 = 0 Then
%>
<TD></TD></TR></TABLE>
Else
  %>
</TABLE>
<%
End If

%>

Hvis det er den kode du bruger, så har du lavet et uendeligt loop
Din rs.movenext og din rs.close
skal også hedde rstemp.movenext og rstemp.close

Du kan jo bare bruge min metode.. :) Den virker.. :)

Thomas

Du har heller ikke skrevet det der står i mit svar.
Der er noget helt galt inde i dine if sætninger.

Thomas --> Det gør min også... :-)

carpe > så jeg også samtidigt ?

Er det muligt at bytte om på række følgen af de to felter - lige nu bytter den jo lidt rundt på min sorteringsrækkefølge

<table width=100%>
<%
i = 1
do while not rstemp.eof
  If i mod 2 = 0 Then
    %>
    <td></td></tr>
  <% else %>
    <tr><td></td>
  <% end if
  i = i + 1
rstemp.MoveNext
Loop
rstemp.Close

If i mod 2 = 0 Then
  %>
  <TD></TD></TR></TABLE>
  <%
Else
  %>
  </TABLE>
  <%
End If
%>

Et godt råd er forøvrigt, at du ikke hele tiden skal "gå ind og ud af" ASP kode
Rent performance mæssigt er det klart en fordel at blive i ASP, og skrive ASP koden ud med Response.Write

Må nok indrømme at jeg tog thb svar - var sgu lidt mere smart.

I orden jeg giver jer 30 point hver ?

Så kom lige med et svar thb

Har du testet thb´s ved et ulige antal poster?

Her kommer der et svar..

Thomas

jeps - det har jeg og det giver meget mindre kode - så det er helt perfekt. Og også let at sætte hvis man f.eks. skal være tre i hver række

Jeg har nu testet dem begge. Og der var egentlig ikke nogen af dem der virkede optimalt. Min egen havde en lidt sjov start. Og thb´s overholder ikke w3c standarden, da den ikke afslutter tabellen korrekt, hvis der er tale om et ulige antal poster.
Så jeg har lavet en modifikation af min egen, men lidt idéer fra thbs.
Det må være den optimale:
Response.Write "<TABLE><TR>"
i = 0
Do While NOT rsTemp.EOF
  If i > 0 AND i mod 2 = 0 Then
    Response.Write "</TR>" & vbCrLf & "<TR>"
  End If
  Response.Write "<TD>" & rsTemp("Felt") & "</TD>"
  i = i + 1
  rsTemp.MoveNext
Loop
rsTemp.Close
If i mod 2 = 0 Then
  Response.Write "</TABLE>"
Else
  Response.Write "<TD>&nbsp;</TD></TR></TABLE>"
End If

carpediem > Det er jo bare at skrive </tr> under kode, og det troede jeg var logik... jeg har heller ikke skrevet <table> og </table>

Nej, når du har et ulige antal poster, kommer din version til at se ud som følger:
<table>
<tr>
<td>første udtrækt</td>
<td>andet udtræk</td>
</tr>
<tr>
<td>trejde udtræk</td>
</tr>
</table>

Der mangler celle nummer to i sidste række i tabellen.
Det er det mine sidste 5 linjer sørger for at lave.

Faktisk har jeg lige fundet en fejl mere i den jeg kaldte den optimale. Der mangler en </TR> afslutning ved lige antal poster.

Response.Write "<TABLE><TR>"
i = 0
Do While NOT rsTemp.EOF
  If i > 0 AND i mod 2 = 0 Then
    Response.Write "</TR>" & vbCrLf & "<TR>"
  End If
  Response.Write "<TD>" & rsTemp("Felt") & "</TD>"
  i = i + 1
  rsTemp.MoveNext
Loop
rsTemp.Close
If i mod 2 = 0 Then
  Response.Write "</TR></TABLE>"
Else
  Response.Write "<TD>&nbsp;</TD></TR></TABLE>"
End If

Det er jo godt nok.. det er jeg sikker at han bliver glad for