E' giusto secondo te questo codice?
<%
for x = 0 to Ubound(arrOrari)
if arrOrari(x) = (appuntamenti.Fields.Item("ORA").Value) then
%>
<td width="74" class="tab_orari_titoli">Ore:
<% arrOrari(x) %>
</td>
<td width="183">PRENOTATO</td>
<% Else %>
<td width="74" class="tab_orari_titoli">Ore:
<% arrOrari(x) %>
</td>
<td width="183">PRENOTA SUBITO</td>
</tr>
<% end if
next
%>
</table>