Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Follow Progress
Message
 
To
12/03/2007 09:20:28
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 6 SP5
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01202665
Message ID:
01202843
Views:
16
This message has been marked as the solution to the initial question of the thread.
>Hi Guys
>
>Which technique/class can I use to follow the progress of commands such as
>COPY TO, APPEND TO/FROM, LOCATE etc. I hate flashing a "Please Wait' message without showing the user the activity progress. Like now I intend to follow the COPY TO ... TYPE CSV Command for the sake of Automation (Excel). Note I have set the TALK OFF and therefore I flash my wait message in a Window defined with DEFINE WINDOW
>
>Can someone lead me to the link(s) that covered the issue of Dates when you Copy To .. Type CSV ?? where dates like 4th March becomes 3rd April ?
>
>
>Thanks
>
>Fred Matano


Hi Fred...

Try the following:
select MyTable

*
* Don't declare the following two variables as local, otherwise
* they won't be "seen" by the MyProgress function
*
private pnRec,pnTotRecs 
pnRec=0
count to pnTotRecs

copy to MyFile.Csv for MyProgress() type csv
wait clear

function MyProgress
pnRec=pnRec+1
wait window nowait ltrim(str(pnRec))+" of "+ltrim(str(pnTotRecs))
return .T.
Also, as far as dates, you can temporarily SET DATE YMD (and SET CENTURY ON) before you issue your COPY TO command and that will ensure the dates will get output as YYYY/MM/DD.

Hope this helps...

--Brad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform