12. juli 2002 - 11:09Der er
18 kommentarer og 2 løsninger
response.write
Jeg henter en masse navne fra en access database. hvordan laver jeg det så der bliver skrevet 10 navne i række? for så at starte på en ny række indtil der ikke er flere navne i tabellen.
Jeg kunne tænke mig at det er noget med at tælle antal records i tabellen for at så bruge antallet til at definere antal gange en for løkke skal køre, men jeg er ikke helt sikker om det er den bedste og smarteste løsning. Mon I har en bedre idé :>Gizom
du kan gøre det her <table> do until RS.EOF <-- køre til slut af fil response.write "<tr><td>" & RS("felt") & "</td></tr> RS.Movenext Loop response.write "</table>
response.write "<table><tr>" Do until RS.eof response.write "<td>" for i = 0 to 9 IF not rs.eof then response.write rs("felt") END IF next response.write "</td>" rs.movenext loop response.write "</tr></table>"
For I = 0 to 3 response.write "<tr>" for j = 0 to 2 If NOT RS.EOF THEN response.write "<td>" & RS("ships") & "</td>" END IF RS.movenext next response.write "</tr>" next
den er ved at være der! Din løsning skriver dem fra venstre mod højre (1,2,3) Kan du får den til at skrive 10 nedad i kolonne 1 og så gå til kolonne 2 for at skrive?
noColPrRow = 0 maxColsPrRow = 10 Response.Write "<table><tr>" do while not rs.EOF if noColPrRow = 0 then Response.Write "<td valign=""top""><table>" end if Response.Write "<tr><td>" & rs("navn") & "</td></tr>"
noColPrRow = noColPrRow + 1 if noColPrRow = maxColsPrRow then noColPrRow = 0 Response.Write "</table></td>" end if rs.MoveNext loop if noColPrRow <> 0 then Response.Write "</table></td>" end if Response.Write "</tr></table>"
eagleeye :> Sådan, copy og paste det kører bare, Tak!!!
mccannon :> Jeg bruger eagleeye kode, derfor får han de 60 point. Jeg giver dig 30 point som tak for hjælpen, håber det er OK!!
Synes godt om
Ny brugerNybegynder
Din løsning...
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.