Oh dear, Oh dear!
What ever happend to :
DATE = ''
FOR I = 31 TO 28 STEP -1
IF OCONV(ICONV(I:rest of date,'D'),'D') = I:rest of date THEN
DATE = I:rest of date
EXIT
END
NEXT I
IF DATE = '' THEN Come to screeching HALT
Of course for the people with backward dates (!!!), the "I:rest of date"
would look like MONTH:I:YEAR with the appropriate separators, wouldn't it????
At 17:01 02/06/05 -0400, you wrote:
I use the method my dad taught me when I was a kid, cuz I couldn't
remember "Thiry days hath September...".
Hold 2 fists side-by-side, forefingers of right & left hand touching.
Each knuckle and each valley between knuckles represents a month.
Start at the left pinky knuckle and count off months.
If a month lands on a knuckle, it has 31 days.
If it lands on a valley, it has 30 days. (Except February has that 28/29
thing going on.)
_ _ _ _ _ _ _ _
/J\_/M\_/M\_/J\/A\_/O\_/D\_/ \
| F A J || S N |
| || |
| || |
\ / \ /
\ / \ /
| left | | right |
| fist | | fist |
view from top
QED
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.5.0 - Release Date: 02/06/05
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.5.0 - Release Date: 02/06/05
Regards,
Bruce Nichol
Talon Computer Services
ALBURY NSW 2640
Australia
http://www.taloncs.com.au
Tel: +61 (0)411149636
Fax: +61 (0)260232119
If it ain't broke, fix it till it is!
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.323 / Virus Database: 267.5.0 - Release Date: 02/06/05
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
