PDA

Bekijk Volledige Versie : ASP + MDB : een lege TR-TD wanneer record anders is



Charlotte
25/01/08, 17:35
hallo,

kan mij iemand een handje helpen met hetvolgende

een ASP-pagina die zijn gegevens uit een access-mdb haalt

ik haal de namen (tabel naam) en een cijfer (tabel afdeling) uit de database

SQL = "SELECT naam, afdeling FROM namen WHERE deelnemer = '1' ORDER BY
afdeling, naam"

voorbeeld uit mijn tabel :

id --- naam --- deelnemer --- afdeling
1 ---- willy --- 1 ------------ 1
2 ---- pieter -- 0 ------------ 0
3 ---- karel --- 1 ------------ 2
4 ---- luc ----- 1 ------------ 1
5 ---- marc --- 1 ------------ 1
6 ---- jan ----- 1 ------------ 1
7 ---- dirk ---- 1 ------------ 2

dit geeft mij hetvolgende :

<tabel>
<tr><td>jan</td></tr>
<tr><td>luc</td></tr>
<tr><td>marc</td></tr>
<tr><td>willy</td></tr>
<tr><td>dirk</td></tr>
<tr><td>karel</td></tr>
</table>

nu zou ik graag hebben dat tussen de rij van willy en dirk een lege rij komt
omdat (volgens de sortering) willy de laatste is van afdeling 1 en dirk de
eerste van afdeling 2 is

dus het gewenste is :

<tabel>
<tr><td>jan</td></tr>
<tr><td>luc</td></tr>
<tr><td>marc</td></tr>
<tr><td>willy</td></tr>

<tr><td>&nbsp;</td></tr>

<tr><td>dirk</td></tr>
<tr><td>karel</td></tr>
</table>

ik heb dit in de ASP-pagina staan :

<table>

<%
If not rs.EOF then
While not rs.EOF

response.Write("<tr><td>" & rs("naam") & "</td>")

hier staat nog wat extra code voor andere TD's (zijn nu niet relevant)

<%
rs.movenext
Wend
End If
%>

</tr>
</table>

wat moet ik toevoegen om die extra
<tr><td>&nbsp;</td></tr>
er tussen te krijgen

kan iemand me de oplossing geven ?

veel dank
charlotte

Jesper de Boer
05/02/08, 19:45
Een beetje late reactie maar, volgens mij is dit het:

<%
If not rs.EOF then

tempafdeling = rs("afdeling")
While not rs.EOF
if tempafdeling <> rs("afdeling") then
response.write "<tr></tr>"
end if
tempafdeling = rs("afdeling")
response.Write("<tr><td>" & rs("naam") & "</td>")
<%
rs.movenext

Jesper de Boer

"Charlotte" < > wrote in message
news:w4omj.45723$Wx1.3965029@phobos.telenet-ops.be...
>
> hallo,
>
> kan mij iemand een handje helpen met hetvolgende
>
> een ASP-pagina die zijn gegevens uit een access-mdb haalt
>
> ik haal de namen (tabel naam) en een cijfer (tabel afdeling) uit de
> database
>
> SQL = "SELECT naam, afdeling FROM namen WHERE deelnemer = '1' ORDER BY
> afdeling, naam"
>
> voorbeeld uit mijn tabel :
>
> id --- naam --- deelnemer --- afdeling
> 1 ---- willy --- 1 ------------ 1
> 2 ---- pieter -- 0 ------------ 0
> 3 ---- karel --- 1 ------------ 2
> 4 ---- luc ----- 1 ------------ 1
> 5 ---- marc --- 1 ------------ 1
> 6 ---- jan ----- 1 ------------ 1
> 7 ---- dirk ---- 1 ------------ 2
>
> dit geeft mij hetvolgende :
>
> <tabel>
> <tr><td>jan</td></tr>
> <tr><td>luc</td></tr>
> <tr><td>marc</td></tr>
> <tr><td>willy</td></tr>
> <tr><td>dirk</td></tr>
> <tr><td>karel</td></tr>
> </table>
>
> nu zou ik graag hebben dat tussen de rij van willy en dirk een lege rij
> komt omdat (volgens de sortering) willy de laatste is van afdeling 1 en
> dirk de eerste van afdeling 2 is
>
> dus het gewenste is :
>
> <tabel>
> <tr><td>jan</td></tr>
> <tr><td>luc</td></tr>
> <tr><td>marc</td></tr>
> <tr><td>willy</td></tr>
>
> <tr><td>&nbsp;</td></tr>
>
> <tr><td>dirk</td></tr>
> <tr><td>karel</td></tr>
> </table>
>
> ik heb dit in de ASP-pagina staan :
>
> <table>
>
> <%
> If not rs.EOF then
> While not rs.EOF
>
> response.Write("<tr><td>" & rs("naam") & "</td>")
>
> hier staat nog wat extra code voor andere TD's (zijn nu niet relevant)
>
> <%
> rs.movenext
> Wend
> End If
> %>
>
> </tr>
> </table>
>
> wat moet ik toevoegen om die extra
> <tr><td>&nbsp;</td></tr>
> er tussen te krijgen
>
> kan iemand me de oplossing geven ?
>
> veel dank
> charlotte
>
>