Vbscript - Cuantos dias tiene un mes?

[npinat]

como hago para determinar si el mes actual tiene 28, 29 30 o 31 dias, utilizando Vbscript.

Gracias

Noel

[Lynx]

No se si sea la mejor forma pero te voy de decir una forma facil y que es la que se me ocurre:

Te lo voy a decir por pasos...

dFechaUtil = "01/" & Month(Date) & "/2003"
dFecPrimerDia = DateAdd("m", 1, cDate(dFechaUtil))
iCantDias = Day(DateAdd("d", -1, dFecPrimerDia))
Response.Write(iCantDias)

Ya esta, quizas solo tengas que hacer unos cambios en relacion al formato de fecha del servidor que utilices, ya que pues yo lo hice y funciono, pero yo tengo formato "dd/mm/yyyy".

[sdnsdlm]

Hola, a mi se me ocurre otra manera aprovechando la función dateserial y teniendo en cuenta la aritmética de fechas de VB, algo del palo:

response.write dateserial(1999, 2, 1) - DateSerial(1999, 1, 1)

Te devolvería por ejemplo el número de días del mes de enero. Pero de veras, aunque no la conozco, me huele que puede existir alguna manera mejor de hacerlo (más inmediata). Casi seguro, pero bueno, tanto esta opción como la de Lynx son buenas y pueden servirte.

Saludos.