skulle vilja kombinera ett pagingscript med detta script:
<html>
<head>
<title></title>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
dsn = "DRIVER={Microsoft Access Driver (*.mdb)};
DBQ="&Server.MapPath("adresser.mdb")
conn.open dsn
SQL = "SELECT * from adresser"
rs.Open SQL, Conn
%>
<table border=1 width=600><tr align=center>
<%
x=0
do while not rs.eof
result = x mod 3
if x=3 and result=0 then
response.write "<tr>"
x=0
end if
response.write "<td width=200 align=center>"
response.write rs("fornamn")
response.write " "
response.write rs("efternamn")
response.write " "
response.write "<br>"
response.write rs("adress")
response.write "<br>"
response.write rs("postnr")
response.write " "
response.write rs("postadress")
response.write "<br>"
response.write rs("land")
response.write "</td>"
x = x +1
rs.movenext
loop
%>
</tr>
</table>
</body>
</html>
Någon som har en idé?