Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
RAND() not very random
Message
From
21/09/2006 15:00:57
 
 
To
21/09/2006 14:45:22
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Miscellaneous
Thread ID:
01155607
Message ID:
01156150
Views:
26
Certainly feels like it to me :o)


>a bit verbose today ? and living dangerously as well ??
>
>
>*lcfilename = (ALLTRIM(STR(yEAR(DATEtime()))) ;
>	+PADL(ALLTRIM(STR(month(DATEtim()))),2,'0') ;
>	+PADL(ALLTRIM(STR(day(DATEtime()))),2,'0') ;
>	+"@"+CHRTRAN(substr(TTOC(DATETIME()),AT(CHR(32),chrtran(TTOC(DATETIME()),':',''))+1),':','') ;
>	+sys(2015))+sys(3)+'.TXT'
>
>local ltNow
>ltNow = datetime()
>lcFileName = dtos(m.ltNow) + "@" ;
>               + left(chrtran(time(m.ltNow),":",""),6 );
>               + sys(2015) + sys(3) + '.TXT'
>? lcFilename
>
>consider the clock also ticking wile the expression is executing and shudder at the dangers of midnight rollover during that time.
>
>Sorry couldn't resist - could it be friday ?
>
>regards
>
>thomas
.·*´¨)
.·`TCH
(..·*

010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"
Previous
Reply
Map
View

Click here to load this message in the networking platform