"Rasmus Nielsen" <rasmusn@rasmusn.dk> skrev i en meddelelse
news:97lu7u$494$1@news.inet.tele.dk...
> Hej,
>
> Hvad gør jeg, hvis et loop skal gøre noget hver anden gang? Eks. skal den
> lave et </tr><tr>-tag hver anden gang.
Hej Rasmus,
Jeg antagere at du dil løbe gennem et recordset (obRs) og lave en tabel med
værdier for recordsettet, hvor du vil udskrive to records (tupler) pr. række
i tabellen. Hvis dette er tilfældet kunne du gøre følgende:
Dim i, objRs
<<kode til at hente recordset>>
do while not objRs.EOF
if i=0 then response.write "<tr>"
response.write "<td>"
<<kode til at udskrive information om aktuelle record>>
response.write "</td>"
if i=1 then response.write "</tr>"
i = (i+1) mod 2
objRs.Movenext
loop
i starter som 0 og bliver derefter skiftevis 1,0,1,0,1,...
hvis du vil have flere records (tupler) pr. række skal du blot modificere
linierne:
if i=1 then response.write "</tr>"
i = (i+1) mod 2
Her er en funktion hvor anatl records (tupler) pr linie i tabellen er
defineret som en konstant du kan ændre på, i eksemplet er der 4 records
(tupler) pr linie i tabellen:
CONST cTUPLER_PR_LINIE = 4
Dim i, objRs
<<kode til at hente recordset>>
do while not objRs.EOF
if i=0 then response.write "<tr>"
response.write "<td>"
<<kode til at udskrive information om aktuelle record>>
response.write "</td>"
if i=cTUPLER_PR_LINIE-1 then response.write "</tr>"
i = (i+1) mod cTUPLER_PR_LINIE
objRs.Movenext
loop
Håber det hjælper,
MVH
Allan Ebdrup
www.aspfastforum.com/aspfastforum/