Fra vandret til lodret - tabeller

ligger tallet (1,2,3) i samme kolonne eller er det en kolonne til hver for ellers er det jo bare at bruge From Where.

Databasen DBTEST indeholder 2 kolonner: Nr og Navn.

Og det skal ende med at se sådan her ud:

Ovs1  Ovs2  Ovs3
IB    SVEND  OLE
RENE  BENT  OLSEN
CAIRO  SILKEBORG
LILLE
LONE

set rs=conn.execute "Select Nr,Navn FROM TabelNavn ORDER BY Nr"

dim lastNr, blnFirst
blnFirst = true
response.write "<table><tr>"

while not rs.eof
    if lastNr <> rs("Nr") then
        if not blnFirst then
            response.write "</td>"
        end if
        response.write "<td vAlign=top>"
        response.write Heading(rs("Nr"))
        lastNr = rs("Nr")
    end if
    response.write "<br>" & rs("Navn")
    rs.movenext
wend

response.write "</tr></table>"
rs.close
set rs = nothing

Øv jeg glemte en linie:

blnFirst = Fase

den skal være lige inden end if ;-)

Smukt, det virker. Jeg måtte dog fjerne Heading!

Tak for hjælpen.

//Claus

Heading er et array du selv må oprette med dine tekster Ovs1, Ovs2,.. Ovs3 - ellers skal du lave noget andet guf som kan skaffe dine overskrifter på rette sted!