lcSourceFolder = cTxt2 
lcDestinationFolder = cTxt3 

lcSourceFilter = lcSourceFolder + '\*.*'

nCount = adir( arrFiles, lcSourceFilter )
for i = 1 to nCount
	sourcefile = lcSourceFolder  + '\' + arrFiles( i, 1)
	targetfile = lcDestinationFolder + '\' + arrFiles( i , 1)
	copy file (sourcefile) to (targetfile)

endfor