Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copy at sub folder
Message
From
05/02/2006 08:41:23
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01093768
Message ID:
01093773
Views:
24
hi,
thank you very much,it work

as you see i have many TABLES need to convert to excel sheets , evry convert i see menu SAVE at the same subfolder , any idea to do that autamaticly,

thanks
>Mahammed,
>this is enough to copy (gcDelimFile) to this folder
>without SET DEFAULT TO
>
>gcDelimFile = [d:\epsoss\rpart2\]+JUSTFNAME(gcDelimFile)
>COPY TO (gcDelimFile) xls
>
>and last
>See in Help COPY TO command
>
COPY TO (gcDelimFile) XLS  d:\epsoss\rpart2 &&& this is wrong d:\epsoss\rpart2
>You need to include path in gcDelimFile
>
>
>
>
>>hi all,
>>
>>i need to copy my excel sheets to sub folder
>>as under.
>>my dir is epsoss
>>mysubfolder is rpart2
>>
>>CLOSE all
>>SET DEFAULT TO d:\epsoss
>>USE rf1&&
>>gcDelimName = ALIAS( ) + '.xls'
>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>IF EMPTY(gcDelimFile)
>>   CANCEL
>>ENDIF
>>COPY TO (gcDelimFile) XLS && d:\epsoss\rpart2
>>*----------------
>>USE rf2&&
>>gcDelimName = ALIAS( ) + '.xls'
>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>IF EMPTY(gcDelimFile)
>>   CANCEL
>>ENDIF
>>SET DEFAULT TO d:\epsoss\rpart2
>>COPY TO (gcDelimFile) XLS  d:\epsoss\rpart2
>>
>>
Previous
Reply
Map
View

Click here to load this message in the networking platform