Det här ett utdrag från en chatt jag jobbar på. Problemet är att jag vill lista kommentarerna baklänges.

Set RecSet = Connect.Execute("SELECT * FROM tblChat")
Dim intCount
intCount = 0 %>

<table width=400 bgcolor="#ADE7E5">
<% Do While Not RecSet.EOF xor intCount >= 10 %>
<tr>
<td width=20 bgcolor="lightblue"><font size=2><b><% = RecSet("sUser") %>:</b></font></td>
<td bgcolor="lightblue"><font size=2><% = RecSet("tData") %></font></td>
</tr>
<% RecSet.MoveNext
intCount = intCount + 1
Loop

Byt ut "SELECT * FROM tblChat" till "SELECT * FROM tblChat ORDER BY ID desc"

Mvh Mik

Tackar.