---

Jeg henter en liste af links fra en database med følgende kode.

<%

' 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 ("database/links.mdb")
Conn.Open DSN

Dim strSQL

' Hent fra databasen afhængig af værdien id fra URL
strSQL = "Select * From " & Request.Querystring("Tabel")
Set rs = Conn.Execute(strSQL)

Do

' Skriv personens data
Response.Write "<dt></dt><dd><li color='#20F5FC'><a href='" & rs("URL") & "'
target='_blank'>" & rs("Linktekst") & "</a></li></dd>"


rs.MoveNext
Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing
%>


Det virker også fint nok, problemet er, jeg gerne vil have listen delt op, i
stedet for at få 30-40 links neden under hinanden, vil jeg gerne have så der
måske er 10-15 stykker i hver lodrette række, kan jeg på en eller anden
måde, så jeg får flere rækker.

Hygsom
Leo

---

her er lidt kode jeg brugte:

snip
'antallet af kolonner sættes her er det 2
const WIDTH=2
for i=0 to antal
if (i mod WIDTH)=0 then response.write "<tr>"
DO WHILE NOT rs.EOF
response.write "<td width='50%' valign='top' > <a href='http://" & rs("url")
&"' </a>" & rs("name") & "</td>"
if (i mod WIDTH)=WIDTH-1 then response.write "</tr>"
i=i+1
rs.MoveNext
LOOP
if (i-1 mod WIDTH)<>WIDTH-1 then response.write "</tr>"
next

snip
Det er et sammensurium af svar i et gammel tråd fra 11-06-01 søg evt. efter
det.

---

takker