Hjælp til lidt pagin
Jeg prøver at lave et smart galleri. Nuværende kode er noget lignende:rs.open "select count (*) as antalbilleder from t_galleri", conn, adopenstatic, adlockoptimistic, adcmdtext 'table eller text
ab = rs("antalbilleder")
rs.close
'koloner
k = 3
'rækker
r = (ab/k)
r = (-(int(-r)))
'ktb = kolonetotalbrede
ktb = 480
'bb = billedebrede
bb = 120
'kb = kolonebrede
kb = ktb/k
'mr = mellemrum til næste billede
'0 = mindst muligt
mr = 0
'tb = table border
' 0 = ingen border
' 1 = border
tb = 0
response.write "<p class=""admintekst"">Tryk på et billede for at se det i stort format.</p>"
rs.open "select * from t_galleri order by dato desc", conn, adopenstatic, adlockoptimistic, adcmdtext 'table eller text
response.write "<table border=""" & tb & """ width=""" & ktb & """>"
for r1 = 1 to r
response.write "<tr>"
for k1 = 1 to k
response.write "<td align=""center"" valign=""middle"" width=""" & kb & """>"
if not rs.eof then
response.write "<a href=""default.asp?vis=visgalleri&show=storbillede&idbillede=" & rs("idbillede") & """ target=""_self""><img border=""0"" alt=""" & rs("tekst") & """ src=""images/galleri/" & rs("galleribillede") & """ width=""" & bb & """></a>"
response.write "<br><div class=""dato"">" & FormatDateTime(rs("dato"),2) & "</div>"
rs.movenext
else
response.write " "
end if
response.write "</td>"
next
response.write "</tr>"
response.write "<tr>"
for k2 = 1 to k
response.write "<td height=""" & mr & """>" &" "& "</td>"
next
response.write "</tr>"
next
response.write "</table>"
rs.close
Men jeg kunne godt tænke mig at siden var i stand til at page billederne, således har jeg nu fået lavet:
rs.open "select * from t_galleri order by dato desc", conn, adopenstatic, adlockoptimistic, adcmdtext 'table eller text
rs.pagesize = 6
rs.absolutepage = page
sidestoerrelse = rs.pagesize
antalsider = rs.pagecount
do while not rs.eof and sidestoerrelse > 0
response.write "<a href=""default.asp?vis=gallery&show=storbillede&idbillede=" & rs("idbillede") & """ target=""_self""><img border=""0"" alt=""" & rs("tekst") & """ src=""/sider/images/galleri/" & rs("galleribillede") & """ width=""" & bb & """></a>"
rs.movenext
sidestoerrelse = sidestoerrelse - 1
loop
response.write "<p admintekst>Gå til side "
for sidenummer = 1 to antalsider
response.write " [ <a class=""gallery"" href=default.asp?vis=gallery&page=" & sidenummer & ">" & sidenummer & "</a> ] "
next
response.write "</p>"
rs.close
Min nuværende løsning viser billederne: 123456
Men jeg vil gerne have at den lige som den gamle metode kan vise billederne:
123
456
evt nemt kan ændres så at den kan vise 9 billeder, gerne i en table. På forhånd tak.