Loop sugli orari, dalle 9.00 alle 21. con intervalli di 30 minuti

[ivanhalen]

Salve ragazzi,
Riesco tranquillamente a fare un loop attraverso alcune date:

<% For i = Cdate("10/10/2009") to Cdate("24/10/2009") %>
<%= i %>

<% Next %>

Come posso fare la stessa con con gli orari, dalle 9.00 alle 21.00 con intervalli di mezz'ora, in maniera da ottenere questo output?

9:00
9:30
10:00
10:30
...
20:00
20:30
21:00

Grazie in anticipo per le risposte!

[agenti]

for i = 9 to 21
response.write i&"00" &"
"
response.write i&"30" &"
"
next

non testata

[ivanhalen]

Grazie Agenti!
Ho trovato anche un'altra soluzione:

<%
hr=9
min=0
sec=0

for i = 1 to 27
Response.write FormatDateTime(TimeSerial(hr,min,sec),4)&"
"
min=min + 30
next
%>