Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Finding Sundays
Message
De
12/04/2000 12:08:15
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
12/04/2000 12:02:40
Steven Dyke
Safran Seats USA
Texas, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Finding Sundays
Divers
Thread ID:
00358746
Message ID:
00358754
Vues:
13
>I need to find all Sundays in a given month.
>
>Thanks and Gog Bless,
>S.Dyke

lparameters tnMonth, tnYear
ldStart=ctod("^"+str(tnYear,4)+"/"+padl(int(tnMonth),2,"0")+"/"+"01")
ldEndDay = gomonth(ldStartDay,1)-day(gomonth(ldStartDay,1))
for ix = 0 to day(ldEndDay)
 ? ldStart+ix, dow(ldStart+ix,2) = 7 && Sunday
endfor
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform