TIP: Click on subject to list as thread! ANSI
echo: quik_bas
to: PAT PRIDGEN
from: ROGER SCUDDER
date: 1997-12-15 03:55:00
subject: date getting

 Hello Pat,
 On Nov 26, 1997 Pat Pridgen of 1:236/7 writes:
PP> DATE$ is already used by QB. If you want to save it as a variable, then
PP> you can just do something like;
PP> d$ = DATE$
PP> OR...some somewhat inelegant code using interrupts.
PP> SELECT CASE Mth%
PP>     CASE 1
PP>     Month$ = "Jan"
PP>     CASE 2
PP>     Month$ = "Feb"
 'You can make this code a lot more elegant by creating a table...
 MONTHTAB$ = "JanFebMarAprMayJunJulAugSepOctNovDec"
 MONTH$ = MID$( MONTHTAB$, Mth% * 3 - 2, 3 )
 
 Sure cuts down on code size doesn't it?
                                        
 Same thing for DOW sept you'll have to pad then trim.  I'll
 leave that one as an exercise for the reader...  :-)
 Regards,
 Roger Scudder
 Send private replies to: rscudder@usa.net
... An Elephant. A mouse built to government specs
--- Msgedsq 3.05
---------------
* Origin: Hodge-Podge Support BBS, Upper Darby, PA (1:273/404)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.