För många klockslag

När jag loopar ut alla klockslag med 5 minuters intervall så blir det lite fult att skriva ut samtliga klockslag men loopen måste ju loopa alla "femminuter" för att hitta posterna och lägga dem rätt.
Skulle det inte gå att få det någonting sådant här:

------------------------------------------------------
07:00
---------
07:30
------------------------------------------------------
08:00 08:15 - 08:30 Möte hos grannen
---------
08:30
------------------------------------------------------
09:00
---------
Osv...
Här är koden:

		  For i = 7 To 18
	       If i < 10 Then 
	         i = "0" & i
	       End If
		   
		   For x = 0 To 55 Step 5
	       If x < 10 Then 
	         x = "0" & x
	       End If
		   
Response.write "<tr bgcolor='"& tColor &"'> <td width=""80"" valign=""top"">" &_
	"<font size=""2""> "& i &":<sup>"& x &"</sup></font></td><td>"
	  
	
	     
	if allPost<>"" then
		SQL_hitta = "SELECT frantid,tilltid,id,rubrik,detalj,user,privat FROM plan WHERE datum=#"& datum &"# and frantid=#"& i &":"& x &"# and (privat=false" & _
        " or user = '" & user & "') order by user,tilltid asc"
		else
		SQL_hitta = "SELECT frantid,tilltid,id,rubrik,detalj,user,privat FROM plan WHERE datum=#"& datum &"# and frantid=#"& i &":"& x &"# and user='"& user &"' and (privat=false" & _
        " or user = '" & user & "') order by tilltid asc"
		end if
	
		Set Rec_hitta = Conn.execute(SQL_hitta)
			Do Until Rec_hitta.eof
			
			  if Rec_hitta("privat")=true then
	privat="<img src=""icons/lock_shut.gif"">"
	end if
	Response.write "<font size=""1""> "& Rec_hitta("user") &" </font><font size=""1"" color=red> "& left(Rec_hitta("frantid"),5) &"-"& left(Rec_hitta("tilltid"),5) &"</font><a title=""" & Rec_hitta("detalj") & """ href=""javascript:PopWin('add_edit.asp?id="& Rec_hitta("id") &"&view=day')""> " & trim(Rec_hitta("rubrik")) & "</a> "& privat &"<br>"
				
			Rec_hitta.movenext
			loop

	
	response.write "</td></tr><tr><td colspan=2><hr size=""1"" noshade color='#000080'></td></tr>"& vbcrlf

next
next

Tack för att WF finns! :OO