Ver Mensaje Individual
  #8 (permalink)  
Antiguo 12/01/2010, 10:20
Avatar de Myakire
Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 22 años, 3 meses
Puntos: 146
Respuesta: Select automatico cada nuevo mes...

Código ASP:
Ver original
  1. <select name="periodo">
  2. <%
  3. MesInicial  = 8
  4. AnioInicial = 2009
  5. While (MesInicial <= Month(Date())) OR AnioInicial < Year(Date)
  6.    %>
  7.    <option><%=MonthName(MesInicial) & " " & AnioInicial %>
  8.    <%
  9.      MesInicial = MesInicial + 1
  10.      If MesInicial > 12 Then
  11.         MesInicial = 1
  12.             AnioInicial = AnioInicial + 1
  13.      End if
  14. Wend
  15. %>
  16. </select>