Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Copy to myserver
Message
De
18/04/2006 19:26:51
Neil Mc Donald
Cencom Systems P/L
The Sun, Australie
 
 
À
18/04/2006 09:18:29
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01114233
Message ID:
01114447
Vues:
19
Try ["\\jtchp58544\new smd\"]

>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
>>>>>>
Regards N Mc Donald
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform