pagning med koloner

du kan lave noget kode i stil med:

'åben et recordset
Set rs = conn.execute(SQL)

maxPrRow = 3 'max antal kolonner pr række
colPrRow = 0 'Tæller
response.write "<table>"
do while not rs.eof
  if colPrRow = 0 then
    response.write "<tr>"
  end if
  Response.write "<td>" & rs("kolonnenavn") & "</td>"
  colPrRow = colPrRow + 1
  if colPrRow = maxPrRow then
    response.write "</tr>"
    colPrRow = 0
  end if
  rs.movenext
loop
if colPrRow > 0 then
  response.write "</tr>"
end if
response.write "</table>"

du kan lave noget kode i stil med:

'åben et recordset
Set rs = conn.execute(SQL)

maxPrRow = 3 'max antal kolonner pr række
colPrRow = 0 'Tæller
response.write "<table>"
do while not rs.eof
  if colPrRow = 0 then
    response.write "<tr>"
  end if
  Response.write "<td>" & rs("kolonnenavn") & "</td>"
  colPrRow = colPrRow + 1
  if colPrRow = maxPrRow then
    response.write "</tr>"
    colPrRow = 0
  end if
  rs.movenext
loop
if colPrRow > 0 then
  response.write "</tr>"
end if
response.write "</table>"

hmm.. så kom den første gang, sorry problem med IE.

eagleye>>> Jeg kigger lige på det i morgen. Er de ens?

Ja de er ens, det må du undskylde. Jeg havde list IE problemmer.

Mange tak