Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Second to last
Message
From
10/06/2013 02:40:05
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Second to last
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Miscellaneous
Thread ID:
01575940
Message ID:
01575940
Views:
89
this is a followup to a solution I received from Sergey and Naomi (with thanks). It gives the title and date of the last changed database in a directory.

I don't know if this is possible but could I select the one BEFORE the last database -
The database that always comes up is called tasks.dbf and is actually always s changed. I would like the code to read
if the last file is tasks.dbf then show me the one before that and it's date of change.

I can make it to the if clause - and even that is probably not the most effective route.


if lafielist='tasks.dbf'
ltZeroTime = CTOT("00:00:00")
= ADIR(laFieList, 'c:\db\prg\menu\*.dbf')
FOR i= 1 TO ALEN(laFieList,1)
laFieList[i,5] = DTOT(laFieList[i,3]) + (CTOT(laFieList[i,4]) - ltZeroTime)
ENDFOR
= ASORT(laFieList, 5,0,5)
ndate = mdy(lafielist(1,3))
ndm = "Last database file change: "+ndate+" "+lafielist
tnx
k
Next
Reply
Map
View

Click here to load this message in the networking platform