Notifikationer

Markér alle som læst Log ud

no_doubt Nybegynder

02. april 2006 - 09:29 Der er 4 kommentarer og
1 løsning

udskrivning af data i tabeller og celler

Hej Eksperter

Hvordan får jeg min side til at skrive ud som følger (dette er kun et ex. med fem forekomster.)

<table border="0" width="100%" id="table1">
<tr>
<td>
<div align="center">
<table border="0" width="31%" id="table2">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
</td>
<td>
<div align="center">
<table border="0" width="31%" id="table3">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
<p> </td>
<td>
<div align="center">
<table border="0" width="31%" id="table4">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
<p> </td>
<td>
<div align="center">
<table border="0" width="31%" id="table5">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
<p> </td>
</tr>
<tr>
<td>
<div align="center">
<table border="0" width="31%" id="table6">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
<p> </td>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>

Synes godt om

keysersoze Ekspert

02. april 2006 - 10:05 #1

<table border="0" width="100%" id="table1">
<tr>
<%
COUNTER = 0
Do While Not rs.eof
%>
<td>
<div align="center">
<table border="0" width="31%" id="table2">
<tr>
<td>Titel</td>
</tr>
<tr>
<td>Billede</td>
</tr>
<tr>
<td>Antal</td>
</tr>
</table>
</div>
</td>
<%
rs.Movenext
COUNTER = COUNTER + 1
If COUNTER = 5 And Not rs.oef Then
COUNTER = 0
%>
</tr>
<tr>
<%
End If
Loop
%>
</tr>
</table>

Synes godt om

nielle Nybegynder

02. april 2006 - 10:15 #2

<%
antalKollonner = 5

sql = "SELECT titel, billede, antal FROM dinTabel ORDER BY titel ASC"
Set rs = conn.Execut(sql)

Response.Write("<table border='0' width='100%' id='table1'>")

kolonne = 0
Do While Not rs.EOF
If kolonne Mod antalKollonner = 0 Then
If kolonne <> 0 Then Response.Write "</tr>"
Response.Write "<tr>"
End If

%>
<td>
<div align="center">
<table border="0" width="<% = 100/antalKollonner %>" id="table<% =kolonne+2 %>">
<tr>
<td><% =rs("titel") %></td>
</tr>
<tr>
<td><% =rs("billede") %></td>
</tr>
<tr>
<td><% =rs("antal ") %></td>
</tr>
</table>
</div>
</td>
<%

rs.MoveNext
Loop

Do While Not kolonne Mod antalKollonner = 0
Response.Write "<td> </td>"
Loop
Response.Write "</tr>"

Response.Write("</table>");
%>

Synes godt om

nielle Nybegynder

02. april 2006 - 10:17 #3

Hov, glemte lige noget vigtigt:

...
<%

rs.MoveNext
kolonne = kolonne + 1 ' <----- Denne linje
Loop
...

Synes godt om

no_doubt Nybegynder

02. april 2006 - 10:54 #4

keyser soze ligger du et svar ?

Synes godt om

keysersoze Ekspert

02. april 2006 - 10:59 #5

det kan jeg da godt :)

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS