Sæt Paging på dette!
er der nogle som kan forklare hvordan jeg kan sætte paging på dette ?<html>
<title>Galleri</title>
<link href="style.css" rel="stylesheet">
<table><%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("galleri.mdb")
Conn.Open DSN
pic = "Select * From Billeder"
set rs = conn.execute(pic)
Do while not (rs.BOF or rs.EOF)
response.write"<tr><td><img src=""" & rs("img") & """></td>"
rs.MoveNext
if not (rs.BOF or rs.EOF) then
response.write"<td><img src=""" & rs("img") & """></td>"
rs.MoveNext
if not (rs.BOF or rs.EOF) then
response.write"<td><img src=""" & rs("img") & """></td></tr>"
rs.MoveNext
else
response.write"<td></td></tr>"
end if
else
response.write"<td></td><td></td></tr>"
end if
loop
%>
Hilsen Kaspar
