Udskriv record fra tabel i db, i 2 tabeller

jeg ved ikke om jeg forstår det rigtigt men her:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database.mdb\")
Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT * FROM tabel\"
rs.Open strSQL, Conn
if rs.EOF then
%>
Ingen data i db\'en
<%
else
%>
<table border=\"1\">
<tr>
<td><b>Felt 1:</b></td>
<td><b>Felt 2:</b></td>
</tr>
<%
Do Until rs.EOF
%>
<tr>
<td valign=\"top\"><%=rs(\"felt1\") %></td>
<td valign=\"top\"><%=rs(\"felt2\") %></td>
</tr>
<%
rs.MoveNext
Loop
end if
%>

nej ikke sådan !

Hvis der er 26 records i db\'en skal der
i den første tabel være de første 13 records
og den næste være de andre 13 !

nåå så er det paging du skal have fat i:
http://www.activeserverpages.dk/aspdigital/kapitel2/paging.asp

Nu kender Netcoders jo nok antallet af kategorier på forhånd, men du kunne jo starte med at tælle antallet af poster og så udskrive første halvdel i den første <td> og resten i den højre:

<table border=\"1\">
<tr>
<td><b>Felt 1:</b></td>
<td><b>Felt 2:</b></td>
</tr>
<tr>
<td valign=\"top\">
<%
i = 0
j = 0
Do Until rs.EOF
i = i + 1
rs.MoveNext
Loop
rs.MoveFirst
Do Until j > i
Response.Write rs(\"felt1\") & \"<br>\"
j = j + 1
rs.MoveNext
Loop
%>
</td>
<td valign=\"top\">
<%
Do Until rs.EOF
Response.Write rs(\"felt1\") & \"<br>\"
rs.MoveNext
Loop
%>
</td>
</tr>
</table>

NÅÅ ja, det var selvfølgelig det han mente!!

nej det er der heller ikke !

Det hele skal være på en side !

26 records i en tabellen i DB\'en (det er jo forskelligt hvor
mange der er i tabellen i DB\'en)

Så skal der i den ene af den tabel jeg har på side
være 13 records og den anden de andre 13 records !

Forstår du ikk!

Det virker ikke medjeti!

Kan du ikke lave en eks. hvor den også connecter til DB\'en !

Sorry... jeg bryggede egentlig bare videre på tpiils eksempel:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database.mdb\")
Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT * FROM tabel\"
rs.Open strSQL, Conn
%>

Og så skal det selvfølgelig være

Do Until j > (i / 2)

...

det virker stadig ikke!

det udskriver alle poster i samme tabel og så kommer der en fejl der under !

Oki tak nu virker det !