Lav script om

Hej,
Jeg har den her asp-fil..

<!--#include file="top.inc"-->
<%
Set data = Server.CreateObject ("ADODB.Recordset")
set data = Myconn.execute("Select TOP 10 * from [Blog] order by id DESC")
%>
    <br/>
    Seneste indlæg
    <br/>
    <center>
    <br/>

    <table width="90%" cellspacing="0" cellpadding="0" class="tbl_bloglist">
    <tr>
      <td class="td_bloglist">
        &nbsp;
      </td>
      <td class="td_bloglist">
        <u>skrevet af</u>
      </td>
      <td class="td_bloglist">
        <u>dato, tid</u>
      </td>
      <td class="td_bloglist">
        <u>læst</u>
      </td>
    </tr>

<%
while NOT data.EOF
%>

    <tr>
      <td class="td_bloglist">
        <a href="ablog.asp?user=<% = data("navn") %>">
<%
Set history = Server.CreateObject ("ADODB.Recordset")
set history = Myconn.execute("SELECT * From [BlogHistory] WHERE [navn] ='"& Session("thisUser") &"' AND forfatter ='"& data("navn") &"'")
%>

<%
if history("forfatter") = session("thisUser") Then
    Response.Write "<img src=""me.gif"" border=""0""/>"

elseif history("blogid") < data("id") Then
    Response.Write "<img src=""new.gif"" border=""0""/>"

else
    Response.Write "<img src=""old.gif"" border=""0""/>"
End if
%>

</a>
      </td>
      <td class="td_bloglist">
        <% = data("navn") %>
      </td>
      <td class="td_bloglist">
        <% = data("dato") %>, <% = data("tid") %>
      </td>
      <td class="td_bloglist">
<%
Set brugerdata = Server.CreateObject ("ADODB.Recordset")
set brugerdata = Myconn.execute("Select antal from [Bruger] WHERE navn = '"& data("navn") &"'")
%>

        <% = brugerdata("antal") %>
      </td>
    </tr>

<%
data.MoveNext
Wend
%>

    </table>
    <br/><br/>
    </center>

<!--#include file="bottom.inc"-->


<!--#include file="db_out.inc"-->

Den viser de 10 sidste indlæg fra alle brugere.. jeg vil gerne have lavet den om, så den kun viser det seneste indlæg fra hver bruger. Så en bruger kun står én gang.

Nogen der kan hjælpe? Jeg har prøvet, men bliver ved med at få fejl på det.