Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copy to myserver
Message
From
18/04/2006 09:18:29
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01114233
Message ID:
01114264
Views:
16
hi ,
thank you it works,
but about the path

i print the path i got
\\jtchp58544\new smd\MAIN1.XLS && but nothing save inside this bath.
any idea.
USE main1
gcDelimName = ALIAS() + [.XLS]
gcDelimName = [\\jtchp58544\new smd\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS])
COPY fields num,Msisdn,date,flag TO  (gcDelimFile) XL5
brow
thanks
>Remove PUTFILE()
>
>USE main1
>gcDelimName = ALIAS() + [.XLS]
>gcDelimName = [\\cctfil01\hrd-spdata\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\]+;
>              [2005 1214 Servcie II\customer database\Treated data\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS])
>COPY fields num,Msisdn,date,flag TO (gcDelimFile) XL5
>
>
>
>>hi,
>>thank you,
>>
>>this code open screen save in llocp---> save as...etc
>>
>>how i can skip this step, make copy automitcly
>>
>>USE main1
>>gcDelimName = ALIAS( ) + '.xls'
>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>IF EMPTY(gcDelimFile)  && Esc pressed
>>   CANCEL
>>ENDIF
>>
>>z="\\cctfil01\hrd-spdata"
>>gcDelimName = [z\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\]+;
>>              [2005 1214 Servcie II\customer database\Treated data\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS])
>>COPY fields num,Msisdn,date,flag TO (gcDelimFile) XL5
>>
>>>Mohammed,
>>>I just saw that your path is not valid:
>>>"\\server\z:\...
>>>It can't be that way. The path is either:
>>>
>>>z:\...
>>>
>>>either:
>>>
>>>\\server\drive_letter_of_shared_drive\....
>>>
>>>
>>>>hi,
>>>>thank you for reply.
>>>>
>>>>but i try as under and i cant see excel sheet at my server path,
>>>>
>>>>is there away to brows only the last operation via this code only,
>>>>mean the previouse operation runing automaticly.
>>>>
>>>>&&&at command button---> click event, maybe it must be used via another events
>>>>SET DEFAULT TO d:\llocp
>>>>
>>>>USE main1
>>>>gcDelimName = ALIAS( ) + '.xls'
>>>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>>>IF EMPTY(gcDelimFile)  && Esc pressed
>>>>   CANCEL
>>>>ENDIF
>>>>
>>>>gcDelimName = [\\server\z:\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\]+;
>>>>              [2005 1214 Servcie II\customer database\Treated data\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS])
>>>>COPY fields num,Msisdn,date,flag TO (gcDelimFile) XL5
>>>>SET DEFAULT TO "\\server\z:\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\2005 1214 Servcie II\customer database\Treated data\"
>>>>brow
>>>>SET DEFAULT TO d:\llocp
>>>>
>>>> CLOSE all
>>>>SET TALK OFF
>>>>SET ECHO off
>>>>SET SAFETY off
>>>>
>>>>***********************************
>>>>SELECT 3
>>>>USE mstr
>>>>SET DELETED on
>>>>append from main2
>>>>DELETE FROM main2
>>>>************************************
>>>>getdir()
>>>>thisform.text9.Value=GETFILE('xls')
>>>>CREATE TABLE main1;
>>>>(msisdn n(15),num n(8),date d(8) ,flag n(1) )
>>>>APPEND FROM (thisform.text9.Value) TYPE xl5
>>>>Replace Date  with thisform.text1.value ;
>>>>        flag   with 0 ;
>>>>               num with RecNo() ALL
>>>>*************************************************
>>>>SET DEFAULT TO d:\llocp\
>>>>
>>>>
>>>>thanks
>>>>>>hi all,
>>>>>>i try to copy my table to excel sheet at my server , but no error message and no result
>>>>>>
>>>>>>USE main1
>>>>>>gcDelimName = ALIAS( ) + '.xls'
>>>>>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>>>>>IF EMPTY(gcDelimFile)  && Esc pressed
>>>>>>   CANCEL
>>>>>>ENDIF
>>>>>>
>>>>>>COPY fields num,Msisdn,date,flag TO "\\server\z:\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\2005 1214 Servcie II\customer database\Treated data\   (gcDelimFile) XL5"
>>>>>>brow
>>>>>>SET DEFAULT TO d:\llocp
>>>>>>
>>>>>>thanks
>>>>>
>>>>>
>>>>>USE main1
>>>>>gcDelimName = ALIAS( ) + '.xls'
>>>>>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>>>>>IF EMPTY(gcDelimFile)  && Esc pressed
>>>>>   CANCEL
>>>>>ENDIF
>>>>>
>>>>>gcDelimName = [\\server\z:\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\]+;
>>>>>              [2005 1214 Servcie II\customer database\Treated data\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS])
>>>>>COPY fields num,Msisdn,date,flag TO (gcDelimFile) XL5
>>>>>brow
>>>>>SET DEFAULT TO d:\llocp
>>>>>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform