14. december 2007 - 02:52Der er
1 kommentar og 1 løsning
billeder på række
nu er jeg på begynder basis i asp programmering men jeg har gået længe og skulle bruge en funktion der kan udskrive billeder fra en access db i f.eks. 4 kolonner og 5 rækker? nogle simple bud?
nu har jeg været så heldig at finde et script fra softspot:
<% ' definer antallet af kolonner i tabellen numcols = 3
' Databaseforbindelse - husk at angive sti til din database Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " DSN = DSN & "DBQ=" & Server.MapPath("db.mdb") Conn.Open DSN
strSQL = "select * From tabel order by id"
Set rs = Conn.Execute(strSQL)
if rs.eof then response.write "ingen billeder" else
response.write("<table width=""50%"">")
idx = 0 do while not rs.eof ' start en ny række af celler if idx mod numcols = 0 then response.Write("<tr>") end if
' undskriv indholdet af en celle response.Write("<td><img src=''><br>" & rs("poletforside") & "</td>")
' afslut rækken og gør klar til at starte en ny if idx mod numcols = numcols-1 then response.Write("</tr>") end if rs.movenext idx = idx + 1 loop
' fyld resten af linie ud med tomme tabelceller if idx mod numcols <> 0 and idx > 0 then for idy = idx mod numcols to numcols-1 response.Write("<td> </td>") next response.Write("</tr>") end if response.Write("</table>")
end if conn.close set conn = nothing %>
hvordan får jeg bygget det så den kun viser 20 billeder pr. side.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.