<table border="0" cellpadding="5" cellspacing="0" width="400">
<%
If RS.EOF Then
Response.Write "<b>Antingen finns inga inlägg inskrivna, eller så har det blivit fel!</b>"
End If
Do until RS.EOF
namn = rs("namn")
meddelande = rs("meddelande")
[b]cnt = cnt + 1
strColor = "#ff0000"
If cnt Mod 2 = 0 then strColor = "#00ff00"[/b]
%>
<tr>
<td width="350" bgcolor="[b]<%=strColor%>[/b]">
<font class="text"><%=meddelande%></font><br><br>
<font face="Verdana" size="1">Inskriven av <%=namn%>
</font>
</td>
</tr>
<%
RS.MoveNext
Loop
RS.close
%>
<tr><td><br>
</td></tr></table>
Texten i fetstil är det viktiga.