Forum de discussion
Forum « Programmation ASP » (archives)
Re: problème pour afficher le resultat d'une requête
Envoyé: 1er octobre 2004, 13h50 par Salem
<%
SQL = " SELECT c.contact_id, c.contact_nom, c.messagerie, c.tel_local "
SQL = SQL & " , c.tel_fixe, c.tel_mobile, cm.mag_id "
SQL = SQL & " , isnull(m.mag_nom, '') as mag_nom "
SQL = SQL & " FROM magasin m, contact_mag cm, contact c "
SQL = SQL & " WHERE c.contact_id = cm.contact_id "
SQL = SQL & " AND cm.mag_id = m.mag_id "
SQL = SQL & " AND m.mag_nom <> '' "
SQL = SQL & " AND m.mag_nom IS NOT NULL "
rs.Open sql, objConnexion
old_mag = ""
DO WHILE not rs.eof
if old_mag <> rs("mag_nom") then %>
<tr><td colspan="5"><%=rs("mag_nom")%></td></tr>
<% old_mag = rs("mag_nom")
end if %>
<tr><td><B><% =rs("contact_nom") %></B></td>
<td><a href="mailto:<% =rs("messagerie") %>@ubaldi.mail">
<% =rs("messagerie") %>@ubaldi.mail</a></td>
<td><% =rs("tel_local") %></td>
<td><% =rs("tel_fixe") %></td>
<td><% =rs("tel_mobile") %></td></tr>
<% rs.MoveNext: loop %>
Réponses
|