>Anyone have a "copy file if newer function"?
>
>I need to copy a bunch of files that may exist if they do I only want to copy them if the file date is newer (ie the file is changed) which I'm hoping will save time...

If you want to copy an entire directory (rather than a previously specified list), you may want to use adir().

>So far i got:
>

>FUNCTION CopyFileIfNewer
>LPARAMETERS lcSource,lcDest
>LOCAL lcError,lok
>
>	lok=.F.
>	IF !FILE(lcSource)
>		RETURN .F.
>	ENDIF
>	
>	IF !FILE(lcDest)
>		COPY FILE (lcSource) TO (lcDest)
>		RETURN .T.
>	ENDIF
>	
>	IF FDATE(lcSource)<>FDATE(lcDest) OR (FDATE(lcSource)=FDATE(lcDest) AND FTIME(lcSource)<>FTIME(lcDest))
>		COPY FILE (lcSource) TO (lcDest)
>		RETURN .T.
>	ENDIF
>RETURN lOk
>

If you use the code above, better change RETURN .T. to lOk = .T.