>USE main1 >gcDelimName = ALIAS() + [.XLS] >gcDelimName = [\\jtchp58544\new smd\] + FORCEEXT(JUSTSTEM(gcDelimName),[XLS]) >COPY fields num,Msisdn,date,flag TO (gcDelimFile) XL5 >brow >>thanks
>>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 >>>>
>>>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,
>>>>>&&&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
>>>>>>>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 >>>>>>