meses entre fechas

lcMeses = ''
gdFechaIniGest = {^2009-06-01}
gdFechaFinGest = {^2010-06-30}
DO WHILE gdFechaIniGest <= gdFechaFinGest
lcMeses = lcMeses +
PADL(MONTH(gdFechaIniGest),2,'0')+'-'+ALLTRIM(STR(YEAR(gdFechaIniGest)))+CHR(13)
gdFechaIniGest = GOMONTH(gdFechaIniGest,1)
ENDDO
MESSAGEBOX(lcMeses)

Limberg.



"Limberg" escribió en el mensaje
news:

Comó puedo recuperar los meses comprendidos entre las dos fechas:

Fecha1 = 01-06-2009
Fecha2 = 31-06-2010

Los meses serían:
06-2009
07-2009
08-2009
.
.
.
06-2010

Limberg.



__________ Information from ESET NOD32 Antivirus, version of virus
signature database 5163 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com





__________ Information from ESET NOD32 Antivirus, version of virus
signature database 5164 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

__________ Information from ESET NOD32 Antivirus, version of virus signature database 5164 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

Tambien puedes dividir la cantidad de dias entre 30.4 que es el factor de
mes al parecer mas exacto.

gdFechaIniGest = {^2009-06-01}
gdFechaFinGest = {^2010-06-30}
lcMeses = ( gdFechaFinGest - gdFechaIniGest ) / 30.4



Documento sin tà­tulo
"Limberg" escribió en el mensaje
news:

lcMeses = ''
gdFechaIniGest = {^2009-06-01}
gdFechaFinGest = {^2010-06-30}
DO WHILE gdFechaIniGest <= gdFechaFinGest
lcMeses = lcMeses +
PADL(MONTH(gdFechaIniGest),2,'0')+'-'+ALLTRIM(STR(YEAR(gdFechaIniGest)))+CHR(13)
gdFechaIniGest = GOMONTH(gdFechaIniGest,1)
ENDDO
MESSAGEBOX(lcMeses)

Limberg.



"Limberg" escribió en el mensaje
news:

Comó puedo recuperar los meses comprendidos entre las dos fechas:

Fecha1 = 01-06-2009
Fecha2 = 31-06-2010

Los meses serían:
06-2009
07-2009
08-2009
.
.
.
06-2010

Limberg.



__________ Information from ESET NOD32 Antivirus, version of virus
signature database 5163 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com





__________ Information from ESET NOD32 Antivirus, version of virus
signature database 5164 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

__________ Information from ESET NOD32 Antivirus, version of virus
signature database 5164 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

Estos grupos están desapareciendo ya. Ya han desaparecido los de web,
controles, etc.

El grupo está ya trasladado a:
http://groups.google.com/group/publ...pro/topics



Saludos,
A.G.P. (Aplicaciones de Gestión y Productividad)
Las Arenas - Vizcaya - España

"Limberg" escribió en el mensaje
news:

Comó puedo recuperar los meses comprendidos entre las dos fechas:

Fecha1 = 01-06-2009
Fecha2 = 31-06-2010

Los meses serían:
06-2009
07-2009
08-2009
.
.
.
06-2010

Limberg.



__________ Information from ESET NOD32 Antivirus, version of virus

signature database 5163 (20100601) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com