****sorry... the first script didn't account for paging.  The script below works with the paging.

Here is a revised script that will work for sql 2k implementations...  although, i did have to run it manually because there was an error getting thrown because something appears to have been taking out the + signs for the concatenation of the userfullname field...  However, once I ran this manually, the module seems to work well on sql 2k.

declare @rows int
set @rows = @MaxEntries * @CurrentPage

select U.[UserID],
U.[Username],
U.[FirstName] + ' ' + U.[LastName] AS UserFullName,
E.[EntryID] as ItemID,
E.[BlogID],
E.[Title],
E.[Description],
E.[Entry],
E.[AddedDate],
E.[Published],
E.[Copyright],
E.[PermaLink],
IsNull(E.[AllowComments],B.[AllowComments]) As AllowComments,
B.[ParentBlogID],
B.[AllowAnonymous],
B.[Syndicated] AS BlogSyndicated,
B.[Public] AS BlogPublic,
( Select Count(*)
FROM dbo.[Blog_Comments]
WHERE EntryID = E.EntryID
AND (Approved = 1)) As CommentCount,
ident = IDENTITY(int, 1, 1)
INTO #topentries
FROM dbo.[Blog_Blogs] B
INNER JOIN dbo.[Blog_Entries] E
ON B.[BlogID] = E.[BlogID]
INNER JOIN dbo.[Users] U
ON B.[UserID] = U.[UserID]
WHERE B.PortalID = @PortalID
AND (E.[Published] = 1)
AND (B.[Public] = 1)
ORDER BY E.AddedDate DESC

select *
from #topentries
where ident between (@rows - @MaxEntries + 1) and @rows

drop table #topentries