Find den nyeste poster

Nu har jeg sætte og fedtet med det her forum, I jeg ved ikke hvor lang tid, jeg vil den nyeste poster, det virker også næsten, der er bare en lille fejl.

Set rsThread = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT TOP 1 F_Replies.R_Date, Users.Alias, Users.UsrID "
strSQL = strSQL & "FROM (Forums INNER JOIN F_Threads ON Forums.ID = F_Threads.FID) INNER JOIN (Users INNER JOIN F_Replies ON Users.UsrID = F_Replies.UsrID) ON F_Threads.TID = F_Replies.TID "
strSQL = strSQL & "WHERE F_Threads.FID = " & ForumID & " "
strSQL = strSQL & "ORDER BY F_Replies.R_Date, F_Threads.T_Date DESC;"
rsThread.Open strSQL, Conntemp

Med denne SQL er det meningen at den skal finde den nyeste poster, fra threads og replies, men den kan kun finde ud af at finde den nyeste poster, fra replies.
Så hvis jeg laver et nyt thread, så skriver den ikke den nyeste poster, det gør den ikke før at der bliver skrevet et reply i det thread.
Håber at der er nogen der forstår og kan jeg hjælpe mig.

På forhånd tak!