Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Auto find month
Message
De
13/07/2009 08:42:12
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01411851
Message ID:
01411861
Vues:
22
>If in first text box value= oct 2009, i want value in 2nd text sep 2010 where year=1
>
>If in first text box value= oct 2009, i want value in 2nd text sep 2011 where year=2
>
>
>increase 12 month
>
>thanks

You can call this procedure to fill your second text box passing the date stored int the first and the number of years you want to skip

procedure nextdate
parameters xDate, xnumYears
private lData
lData = gomonth(xdate,(xnumyears*12)-1)

retu cmonth(ldata) + ' ' + alltrim(str(year(ldata)))
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform