Il fatto che funzioni, non vuol dire che sia corretto (cito la famosa firma di weppos).

Ad ogni modo secondo me questo blocco di codice:

codice:
<% For u = 1 To 12 %> 
<option value="<%=u%>" selected<% End If %> <% If u = iMonth Then %>> 
<%=Left(NameFromMonth(u),3)%></option> 
<% Next %>
va rettificato così:

codice:
<% For u = 1 To 12 %> 
<option value="<%=u%>"><% If u = iMonth Then %>selected<% End If %>>
<%=Left(NameFromMonth(u),3)%></option> 
<% Next %>