|
 |
| |
|
<% '--- Création du recordset ; Définir : TABLE ---
sqlText = "SELECT * FROM news WHERE publier='oui' ORDER BY row_news ASC, date_news DESC"
SET rs = SERVER.CREATEOBJECT("ADODB.RECORDSET")
rs.OPEN sqlText, objCon, 1, 1, adCmdText
'--- Test de Recordset vide ---
IF rs.EOF THEN
%>
<% ELSE
DO WHILE NOT rs.EOF
%>
<% '---------- Test de l'image ----------
IF rs("img_news") = "" THEN
RESPONSE.WRITE rs("desc_news")
ELSE
IF rs("img_place") = "" THEN
img_place = "left"
ELSE
img_place = rs("img_place")
END IF
%>
 "align="<%=img_place%>">
<%=rs("desc_news")%>
<% END IF %>
|
|
<% rs.MOVENEXT
LOOP
END IF %>
|
|
|
