Hola, este codigo me deberia generar el ultimo dia de cada mes, sin embargo, me genera como ultimo dia otro valor distinto, ¿Como lo corrigo sobre este mismo codigo?
Dim dNextStart
If CInt(intMonthNum) = 12 Then
dNextStart = CDate( "1/1/" & intYearNum)
Else
dNextStart = CDate(intMonthNum + 1 & "/1/" & intYearNum)
End If
GetLastDay = Day(dNextStart - 1)
Response.Write(GetLastDay)