potresti risolvere con 2 interrogazioni tipo così
codice:
<%
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("z.mdb")
Conn.Open strConn
Set RsE=Server.CreateObject("ADODB.Recordset")
sql="SELECT DISTINCT ute FROM New"
RsE.Open sql, Conn, 3, 3
while not(RsE.EOF)
Set Rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT TOP 1 * FROM New WHERE ute="& rsE("ute")&" ORDER BY ID DESC"
Rs.Open sql, Conn, 3, 3
while not(Rs.EOF)
%>
<%=RS("ID")%>, <%=RS("ute")%>
<%
rs.movenext
wend
rsE.movenext
wend
rsE.close
rs.close
Conn.close
%>
risultato
ID News Id Utente
6, 1
9, 2
10, 3
7, 4
11, 5
con questi dati
ID News Id Utente
1 1
2 1
3 2
4 5
5 2
6 1
7 4
8 3
9 2
10 3